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46 
re HISTORY 
& cen Oe ee 
49 NO CHANGES TO THE 11/34 FLOATING POINT DIAGNOSTIC PART "A" WERE 
50 FOUND TO BE NEEDED TO ADAPT IT FOR USE ON THE 11/4 
52 THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
33 TU MAKE THE PART 'B' COVER THE 11/44 
55 1. TEST 22 - PROCESSOR LOOKS TO SEE IF APT IS CON- 
56 TROLLING THE TEST. AND IF IT IS, CHECKS TO SEE 
57 IF THE USER HAS SELECTED THIS TEST BY CHECKING 
58 BIT 7 IN THE SWITCH REGISTER. IT HAS ALSO BEEN 
| 59 CHANGED SO THAT IF BIT 7 IS *ONE*, THE CODE WILL 
| 60 SELECT THE TEST. 
| 62 THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
| 63 TO MAKE THE PART 'C* COVER THE 11/44 
| 65 1. TEST 76 - CHECKS THAT FP PROCESSOR DOESN'T ACCESS 
66 D-SPACE UNTIL CONDITIONS WARRANT. 
68 2. TESTS 77 THROUGH 106 - CHECK THAT SR1 MATCHES 
69 WHAT ACTUALLY HAPPENED TO THE REGISTER OF THE 
70 INSTRUCTION, AND THAT THE VALUE OF AUTO INCREMENT 
7] /DECREMENT WAS PROPER. 
? | ALL THREE PARTS WERE RE-RELEASED WITH A NEW SYSMAC THAT CHECKS 
7% BIT 0 OF THE CPU ERROR REGISTER (POWER MONITOR BIT). THE ADDITIONS 
75 WERE MADE IN THE SCOPE ROUTINE, EXECUTED AT THE BEGINNING OF 
76 EACH TEST. IF THE BIT BECOMES SET, AN ERROR IS CALLED FROM THE 
77 SCOPE ROUTINE. THE BIT IS CLEARED. AND THE TEST IS CONTINUED. 
78 IF THE BIT BECOMES SET IN THE MIDDLE OF A TEST, AND AN ERROR OCCURS 
79 FOR ANY REASON, THE ERROR ROUTINE WILL CALL *TWO* ERRORS, THE POWER 
80 MONITOR BIT ERROR FIRST, THEN THE ERROR ORIGINALLY CALLED. IN 
g ADDITION, THE SREAD ROUTINE NOW CHECKS FOR A RANDOMLY INPUTED “0 
82 BEFORE A *S IS TYPED. THIS BECAME NECESSARY WITH CERTAIN DATA 
83 CONNECTIONS OF SOME SYSTEMS. 
85 THE FOLLOWING WAS ADDED TO PART 'D’: 
87 THE ABILITY OF THE PROGRAM TO PRINT AN END-OF=PASS MESSAGE ONLY EVERY 
48 1000TH PASS. EOP MESSAGES CAN BE DISABLED ALTOGETHER BY TYPING ANY KEY, 
89 AND CAN BE REENABLED BY AGAIN TYPING ANY KEY. THIS IS A PAPER- SAVING 
90 ADDITION WHEN THE DIAGNOSTIC IS TO BE RUN OVERNIGHT WITH A HARD COPY 
91 TERMINAL, NOT TO MENTION TURNING THE DIAGNOSTIC INTO A HARDWARE INTENSIVE 
92 TEST INSTEAD OF A TEST OF THE TERMINAL. 
! 
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137 1. ABSTRACT 

138 venient 

139 

ys THE THREE PROGRAMS: 

4 CKFPADO CKFPBCO CKFPCDO 

144 ARE DESIGN TO DETECT AND REPORT LOGIC FAULTS IN THE 
145 PDP 11/44 FP11-F FLOATING POINT PROCESSOR. THE 
14 DESIGN IS AN ATTEMPT TO REACH ALL ROM STATES, TAKE 
14 ALL BRANCH MICRO TESTS (BUT'S) AND VERIFY ALL THE 


LOGIC. THEY CONSIST OF 157 (OCT) INDIVIDUAL TESTS 

ae TO DETECT AND ATTEMPT TO IDENTIFY FAULTS 

WITH A MINIMUM HARDWARE OR SOFTWARE LEVEL. _ THE 

TESTS. ARE PARTIONED INTO THREE STAND-ALONE PROGRAMS 

DESCRIBED BELOW. 

NOTE THAT ERROR REPORTS IN THESE PROGRAMS ARE BASED 
UN AND IN MOS H 

POINT FAULT IN THE FP11=F. IF THE PROGRAMS OR TESTS 

ARE NOT RUN IN ORDER THEN ERROR MESSAGES MAY NOT BE 

ACCURATE. 

A. CKFPADO 

CKFPADO TESTS: 


LDFPS 
STFPS 


CFCC 

ig SETD, SETI AND SETL 

LDF AND LDD (ALL SOURCE MODES) 

STD (MODE 0 AND 1) 

ADDF, ADDD AND SUBD (MOST CONDITIONS) 
B. CKFPBCO 
CKFPBCO TESS: 


ADDF, ADDD AND SUBD (ALL CONDITIONS NOT 
TESTED IN CKFPADO) 
CMPD AND CMPF 


ee ee ee ee eee ee ee ee eee 
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C. CKFPCDO 


ow 
wm 


6? CKFPCDO TESTS: 

89 STF AND STD (ALL MODES) 

50 STCFD AND _ STCDF 

91 CLRD AND CLRF 

92 NEGF AND NEGD 

93 ABSF AND ABSD 

46 TSTF AND TSTD 

95 NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
96 NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
97 LDFPS (ALL SOURCE MODES) 

98 LDCIF AND LDCLF 


LDCID AND LDCLD 


STFPS (ALL DESTINATION MODES) 
STCFL AND STCFI 
STCDL AND STCDI 


ao 
4 
m 
x< 
v 
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STEXP 

STST 
2. REQUIREMENTS 
2.1 EQUIPMENT 


A PDP 11/44 (WITH OR WITHOUT CONSOLE), LA30 (OR 
EQUIVALENT) AND AN FP11-F FLOATING POINT PROCESSOR. 
NOTE THAT A SPECIAL INTERRUPTS TEST MODULE IS_ BEING 
DESIGNED FOR USE IN THE MANUFACTURING ENVIRONMENT. 
WHEN THIS DEVICE IS PRESENT THE PROGRAM CKFPBCO WILL 
MAKE U OF IT TO TEST THE FPP INTERRUPT ON BUS 
REQUEST FUNCTIONS. 


2.2 STORAGE 


ALL THREE PROGRAM REQUIRE A MEMORY SYSTEM OF AT 
LEAST 16K TO LOAD AND RUN. 


2.3 PRELIMINARY PROGRAMS 


THESE THREE DIAGNOSTICS WILL ASSUME THAT THE PDP 
11/44 CENTRAL PROCESSOR IS FAULTLESS, THEREFORE WHEN 
IN DOUBT RUN THE PDP 11/44 PROCESSOR DIAGNOSTICS 
BEFORE THESE FP11-F DIAGNOSTICS. 


Wiwiwiwnonononongony MN 3 SS I - 2 QOOOOOCOO 


Wnr—Oowo 


: LOADING PROCEDURE 


THE PROGRAMS WILL BE SUPPLIED ON _ THE _ 11/44 
DIAGNOSTIC MEDIA. REFER TO THE XXDP OPERATING 
MANUAL FOR FURTHER INFORMATION. 
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240 4. STARTING PROCEDURE 
& 
43 4.1 CONTROL SWITCH SETTINGS 
245 SEE SECTION 5.1 
349 4.2. PROGRAM AND OPERATOR ACTION 
| 368 1. LOAD PROGRAM INTO MEMORY 
50 2. LOAD ADDRESS 200 
51 3. SET CONSOLE SWITCHES (IF CONSOLE IS PRESENT) 
38 4. PRESS START 
25 ON FIRST PASS THE PROGRAM 
254 WILL IDENTIFY ITSELF. NOTE THAT IF THERE IS 
55 NO PHYSICAL CONSOLE THE PROGRAM WILL REQUEST 
256 THE OPERATOR FOR INITIAL VALUE FOR THE 
257 SOFTWARE SWITCH REGISTER (SEE SECTION 8.5). 
258 IF RUNNING UNDER ACT, APT OR CHAIN THIS DOES 
260 .. THE PROGRAM WILL LOOP AND AN END OF PASS AND 
261 ERROR SUMMARY WILL BE TYPED AT THE END OF 
26 EVERY PASS. 
264 5. OPERATING PROCEDURE 
J <> So ee o> te we we ee oe ee 
66 
267 5.1 OPERATIONAL SWITCH SETTINGS 
269 THE SWITCH SETTING ARE: 
271 OCTAL 
272 SW<15>=1. 100000 HALT ON ERROR 
273 SW<14>=1.. 40000 LOOP _ON CURRENT TEST 
274 SW<13>=1... 20000 «INHIBIT ERROR TYPE OUTS 
275 SW<12>=1... 10000 «INHIBIT T-BIT TRAPPING 
276 SW<11>=1... 4000 “INHIBIT ITERATIONS 
277 SW<10>=1... 2000 - RING TTY BELL ON ERROR 
278 SW<9D=1.. 1000 LOOP ON ERROR 
279 SW<B>=1.... 400 LOOP ON TEST SPECIFIED IN SwW<6> 
280 THROUGH SW<0> 
281 SW<7>=1.... 200 PRINT ERROR SUMMARY EVEN IF 
282 SW<13>=1, THIS APPLIES ONLY TO 
283 PROGRAM CKFPADO. 
284 SW<7>=1.... 200 SELECT CORRECT INTERRUPT TEST IN 
285 PROGRAM CKFPBCO. 
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6. 


6.1 


6.2 


8.2 


8.3 


ERRORS 


SUMMARIES 


IN PROGRAM Sag tre: TESTS 1 AND 11 HAVE A SPECIAL 
ERROR S Y FEATURE. THESE TWO TEST RUN MANY 

TEST PATTERNS THROUGH THE LOGIC. AFTER AN_ ERROR 
IS ENCOUNTERED, ONLY THE FIRST FIVE ERRORS ARE 
REPORTED (TYPED ON THE TTY). EVERY ERROR THOUGH IS 
LOGGED AND AN ERROR SUMMARY IS PRINTED WHEN THE 
TEST IS COMPLETE. NOTE THAT IF SW<13>=1, THIS 
SUMMARY WILL NOT BE TYPED UNLESS SW<7>=1. IN OTHER 
WORDS TO GET JUST AN ERROR SUMMARY FROM EITHER OF 
THESE TWO TESTS 1 AND 11 IN PROGRAM CKFPADO BOTH 
SWITCHES 15 AND 7 MUST = 1. 


ERROR RECOVERY 


SW<15:9>=0... MCST Ss WILL ag EXECUTION TO 
GO TO THE START THE NEXT TEST 
AFTER THE MESSAGE Is” TYPED. A FEW 
TESTS ARE IN SECTIONS. _IN THESE 
TESTS AN ERROR WILL CAUSE EXECUTION 
TO GO TO THE NEXT SECTION AFTER THE 
MESSAGE IS TYPED. 


SW<15>=1... THE PROGRAM WILL HALT AFTER TYPING 
THE ERROR MESSAGE. PRESSING THE 
CONSOLE CONTINUE WILL CAUSE_ THE 
PROGRAM TO CONTINUE AS IF SW<15>=0. 


RESTRICTIONS 


NONE 


EXECUTION TIMES 
LESS THAN 10 SECONDS FOR EACH PROGRAM ON ANY PASS. 
STACK POINTER 


THE STACK POINTER IS INITIALIZED TO 1100 IN EACH OF 
THE THREE PROGRAMS. 


PASS COUNT 
THE PROGRAM MAKES ONE PASS FOR EACH END OF PASS 
MESSAGE TYPED. THE END OF PASS MESSAGE a Tathe 


THE TOTAL NUMBER OF PASSES COMPLETED AND THE  TOTA 
NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE. 


EE 
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8.4 


8.5 


8.6 


8.7 


T-BIT TRAPPING 


IF SW<12>=0 EACH PROGRAM WI 
ON EVERY OTHER PASS. F 
TRACE TRAPS. NOTE SW<12>=1 


SOFTWARE SWITCH REGISTER 


EACH OF THE THREE PROGRAMS WILL RUN WITH OR WITHOUT 
A CONSOLE SWITCH REGISTER. IF A PHYSICAL CONSOLE 
poe REGISTER IS PRESENT ON THE SYSTEM, THEN THESE 
PROGRAMS WILL GO yet AND USE IT FOR THE SWITCH 
FUNCTIONS DESCRIBED IN 5.1 ABOVE. IF HOWEVER THERE 
IS NO CONSOLE SWITCH REGISTER ON THE SYSTEM A 
SOFTWARE SWITCH REGISTER WILL BE USED. THIS 
a. gs REGISTER CAN BE EXAMINED OR MODIFIED 
AT ANY TIME BY THE USER IF Y3 TYPES CONTROL G WHILE 
THE PROGRAM IS RUNNING. THIS CONTROL G WILL CAUSE 
THE CONTENTS OF min SOFTWARE SWITCH REGISTER TO BE 
TYPED ON THE TTY AND ASK THE USER FOR A NEW VALUE. 
WHEN THE USER TYPES A VALUE AND CARRIAGE RETURN THEN 
THE et wr’ WILL RESUME TESTING AT da, SAME POINT AT 


L RUN WITH TRACE TRAPS 
RST PASS WILL NOT ENABLE 
DISABLES T-BIT TRAPS. 


AS 
REGISTER VALUE AFTER LOADING ADDRESS 200 AND 
STARTING THE PROGRAM THE FIRST TIME THE PROGRAM IS 
RUN AFTER LOADING (ONLY IF NO CONSOLE SWITCH 
REGISTER IS ON THE SYSTEM). 


INTERRUPTS TEST 


IN PROGRAM CKFPBCO THERE IS A SPECIAL TEST FOR 
CHECKING THE CORRECT FLOWS OF THE FPP. THIS TEST 
CAN BE RUN ONLY IF A SPECIAL TEST MODULE IS_ IN_ THE 
SYSTEM. THIS MODULE WILL PROBABLY ONLY BE USED IN 
MANUFACTURiNG. IF THIS MODULE IS NOT IN THE SYSTEM 
THIS TEST WILL AUTOMATICALLY BE DESELECTED. IF THIS 
TEST MODULE IS ON THE SYSTEM AND SW<7>=1 THIS TEST 
WILL BE RUN. IF SW<7>=0 THIS TEST WILL BE 
DESELECTED. 


ACT, APT AND XXDP COMPATIBILTY 
THESE — ARE FULLY COMPATIBLE WITH: 


ACT 
XXDP MONITOR AND CHAIN PROGRAMS. 


ee anneal -- 
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39 9. PROGRAM DESCRIPTION 

ee SE apy 

395 TEST 1 LDFPS, STFPS AND DATA PATHS TEST 

337 

398 THIS IS A TEST OF THE LDFPS (LOAD FLOATING POINT 
395 STATUS) AND STFPS (STORE ‘LOATING POINT STATUS) 
400 INSTRUCTIONS. A COUNT PATTERN IS GENERATED AND RUN 
401 THROUGH THE FLOATING POINT STATUS REGISTER. THIS 
40 WILL TEST THE 16-BIT TRI STATE BUS WHICH CONNECTS 
40 THE CPU WITH THE FPP AND ALSO RUNS INTERNALLY WITHIN 
404 THE FPP. ONLY DMO AND SMO ARE USED. NOTE THAT A 
405 MASK MUST BE USED BECAUSE SOME OF THE FPS BITS 
406 CANNOT BE SET. 

408 ONLY THE FIRST FIVE ERRORS WILL BE REPORTED 
409 INDIVIDUALLY. | THIS IS TO PREVENT LOCKING OUT THE 


COMPLETION OF THE TEST BECAUSE OF VIRTUALLY ENDLESS 
NUMBER OF ERRORS. ONLY FIVE INDIVIDUAL ERRORS - 
BE REPORTED THEN THE TEST WILL BE COMPLETED AND 
ERROR SUMMARY GIVEN (SEE NOTE BELOW). 


NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE 
LOGICAL "AND* AND ‘OR® OF THE FAILING DATA PATTERNS. 
THESE CAN BE VERY USEFUL IN DETERMINING STUCK BITS. 


HE 
INDIVIDUAL ERROR MESSAGE PLUS AN ERROR SUMMARY A 
THE END OF THE TEST. ee katt ERROR PRINT our 


RROR S Y 
WITH NO INDIVIDUAL ERROR REPORTS, SET SWITCH 
REGISTER BIT13 AND SWITCH REGISTER BIT7 BOTH ON. 


TEST 2 CFCC TEST 


THIS IS A TEST OF THE COPY CONDITION CODES 
INSTRUCTION, CFCC. 


TEST 3 SETF, SETD, SETI AND SETL TEST 


THIS IS A TEST OF THE SETF, SETD, SETI  AND_ SETL 
INSTRUCTIONS. EACH INSTRUCTION IS EXECUTED WITH THE 
FPS CONTAINING ALL ONES AND ALSO WITH THE FPS CLEAR. 
THE RESULT OF EACH SITUATION IS CHECKED. 
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os TEST 4 ILLEGAL FPP OP CODES AND STST TEST 
4 weeeenm 8 3} }3}3}5= =£ ~s eS eS Se ee Se Se eee ee eee esoeoaoouooeoeoe = 

54 

446 THIS IS A TEST OF THE FPP OPERATION CODES: 

466 170003 

4? 170004 

448 : 

469 170010 

450 170013 

651 170014 

433 170077 

455 THESE ARE ILLEGAL INSTRUCTIONS AND WITH INTERRUPTS 
456 ENABLED SHOULD CAUSE A TRAP TO 244. ALSO TESTED 
457 HERE IS THE INSTRUCTION: STST mh WHICH SHOULD PUT 
458 THE FEC CODE 2 IN R1, AFTER ANY OF THE ABOVE OP 
439 CODES IS EXECUTED. 

461 | TEST 5 FID, INTERRUPT DISABLE, BIT TEST 

46 

464 THIS IS A TEST OF FPS BIT 14 (FID) OR FLOATING 
465 INTERRUPT DISABLE. AN ILLEGAL INSTRUCTION IS 
46 EXECUTED WITH FID=1. NO INTERRUPT SHOULD OCCUR. 

468 TEST 6 LDD AND STD, WITH SRC AND DST MODE 1, TEST 
470 , 

471 THIS IS A TEST OF BOTH THE INSTRUCTION: 

47 LDD (RO) ,ACO 

47 AND THE INSTRUCTION: 

47% STD ACO, (RO) MOST OF THE 
475 FAILURES ARE ISOLATED TO THE SRC OR DST FLOWS. NOTE 
476 THAT THE INTEGRITY OF ACO HAS NOT BEEN ASSURED. 
477 THIS MEANS THAT IN SOME CASES IT WILL BE IMPOSSIBLE 
478 TO ISOLATE CERTAIN DATA PATTERN FAILURES TO EITHER 
479 THE FLOWS OR THIS ACCUMULATOR. 

481 TEST 7 FSRC MODE 0 TEST 

48 

484 THIS IS A TEST OF FSRC MODE ZERO USING THE LDD AND 
485 LDF INSTRUCTIONS. 

486 

487 

488 TEST 10 FDST MODE O TEST 

—- 00—00U™™———~—~— eis Seagate anata 

490 


491 THIS IS A TEST OF THE STORE INSTRUCTIONS, STD AND 
492 STF, WITH FDST MODE 9. 


a a me eee 
ee ER 


ee 


L 3 
“KFPADO FRITE FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE i2 SEQUENCE 11 


rt 6 TEST 11 ACCUMULATORS DATA PATTERNS TEST 

BI Ka xX LLL LLL LLL ITED 

495 

496 THIS IS A TEST OF THE FLOATING POINT PRCCESSOR 
re 4 ACCUMULATORS. 7 

4 

499 EACH ACCUMULATOR IS yt tlt. IN TWO WAYS: 

500 1 TEST PATTERN GENERATED BY FLOATING A 
501 ONE ACROSS A FIELD OF ZEROES. 

50 2 TEST ajicy GENERATED BY FLOATING A 
50 ZERO ACROSS A FIELD OF ONES. 

eRe EACH OF ACCUMULATORS aco” THROUGH A ACS IS TESTED. 

08 NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF _ THE 
50 LOGICAL "AND' AND ‘OR* OF THE FAILING DATA PATTERNS. 


THESE CAN BE VERY Ae IN DETERMINING STUCK BITS. 

IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH 
(SWR13) OFF, THEN THE USER WILL RECEIVE EACH 
INDIVIDUAL ERROR Se: PLUS AN ERROR SUMMARY AT 
THE END OF THE TEST NHIBITING ERROR PRINT OUT 


CASE DESCRIBED BELOW. TO GET JUST THE ERROR SUMMARY 
WITH NO INDIVIDUAL ERROR REPORTS, SET SWITCH 
REGISTER BITI3 AND SWITCH REGISTER Rr? BOTH ON. 


© 
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THE FOLLOWING PROCEDURE IS PRESENTED TO AID _ THE 
TROUBLE SHOOTER IN SITUATIONS WHERE AM2901 CHIP 
ISOLATION IS ATTEMPTED. 


WARNING: THIS PROCEDURE ASSUMES THAT THE FAULT IS 
IN ONE OF THE AM2901 CHIPS. THIS ASSUMPTION IS NOT 
NECESSARILY VALID IN ALL SITUATIONS. IT REMAINS TO 
BE SEEN WHAT NUMBER OF FA 


SUGGESTION FOR ACHIEVING ISOLATION WHEN CHIP LEVEL 
REPAIR IS NECESSARY. 


WHEN THIS TEST HAS hogy Fe RUNNING, IF ERRORS HAVE 
OCCURRED, AN ERROR SUMMARY WILL BE TYPED. THUS 


WIAA PPINIPINPIPINP) 


LOGICAL ‘OR® (‘+ OF THE FAILING 
DATA PATTERNS. 


PULP PUPP PUPESU SUPP ISDSIIIAI IOAAIIAIIAAUI UA 


35 SUMMARY WILL mae OF TWO IMPORTANT QUANTITIES: 
33 FOUR SIXTEEN BIT NUMBER S LABELED THE 
3 LOGICAL '‘AND' (°s") OF THE FAILING 
38 DATA PATTERNS. 

, B. FOUR SIXTEEN BIT a LABELED THE 
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A BIT STUCK HIGH IN THE HARDWARE WILL SHOW UP AS A 0 
Ny POSITION OF THE “OR' OF THE FAILING DATA 


A BIT STUCK LOW IN THE HARDWARE WILL SHOW UP AS f 1 
N THAT BIT POSITION OF THE ‘AND* OF THE FAILING 
DATA PATTERNS. 


THUS IF A FAILURE OCCURS: 
Anas parSpuGk HIGHS WILL SHOW AS O'S IN THE 


TTERN. 
B. STUCK LOWS WILL SHOW AS 1°S IN THE 
"AND* PATTERN. 


IF THE AS eg IS INTERMITTANT THEN THIS ors WILL 


"AND' PATTERN WILL BE ALL O'S AN 
WILL BE ALL 1°S. WHEN THIS OCCURS SOME OTHER METHOD 


INDIVIDUAL ERROR REPORT RATHER THAN USING’ THE 
SUMMARY) . 


MAP THE FOLLOWING NOTATION ONTO EACH BI’ POSITION IN 
THE D ins "OR' PATTERNS WHICH ARE TYPED IN 
THE ERROR SUMMARY. 


A15,A14,...A1,A0 B15,B14,...B1,B0 
C15.C14,...C1,C0 D15,D14,...C1,C0 


fe THIS NOTATION A15 THROUGH AO IS THE FIRST OF [HE 
FOUR 16 BIT OCTAL NUMBERS TYPED, B15 THROUGH BO IS 
THE SECOND, ETC. 


THIS TABLE SHOWS THE CORRESPONDING AM2901 CHIP ('‘E’ 

NUMBER) WHICH IS RESPONSIBLE FOR = BIT "ae toe 
USING THE ABOVE NOTATION. NOTE THAT ECO'S TO _ THE 
HARDWARE MIGHT MAKE THIS TABLE OBSOLETE IF IT IS NOT 
UP DATED. NOTE ALSO THAT THERE ARE FOUR BITS FOR 
EACH AM2901 CHIP: 


—— ee ee 


SEQUENCE 


12 
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AND N IS 15, 14, ... OR 0 


THEN IN were” ANY OF THE FOUR CHIPS 
RESPONSIBLE FOR AN, BN, CN OR DN COULD BE AT 
FAULT, WITH LN BEING MOST PROBABLE. 


FOR EXAMPLE IF BIT ts IS FAULTY, 

THEN CHIP E79 xs MOST 

PROBABLE SOURCE 0 THE ERROR. IF REPAIRING 

THAT CHIP DOES NOT REMOVE THE FAULT THEN TRY 

EACH OF THE CHIPS ASSOCIATED WITH BITS Ale, 

AE: AND Di2 SHOULD BE TRIED wy be EQUAL 
PROBABILITY OF THE FAULT BEING IN ANY ONE OF 

THESE OTHER THREE CHIPS, TRY CHIPS £61, E86 AND E78. 


584 BITS AM2901 CHIP NUMBER 
Re aeerth., aoe 
587 AlS. Als, Al3. Al2 £37 
© alt Al 8 E45 
589 7,A6, ash E34 
90 a3. "A2.A 7°46 E42 
098 B15,814,B13,B12 £33 
59 B11.B10.B9,B88 E41 
594 B7.86,B85,B4 E36 
595 B3.B2.81,B0 E44 
239 €15,C14,C13,C12 E35 
598 €11.€10.C9,C8 E43 
599 €7,06,¢5,C4 E38 
ret €3,C2,C1,C0 E46 
602 D15,D14,D13,D12 E39 
D11.D10.D9,08 EZ 
4 D7,D6,D5,D4 E40 
605 D3,D2,D1,D0 E48 
7 NOW FIVE IMPORTANT CASES WHICH WILL ARRISE WHEN A 
é FAULTY AM2901 IS PRESENT CAN BE DESCRIBED: 
0 
1 1.) IF ONLY ONE BIT OF THE 64 BITS IS INCORRECT 
é THE CHIP INDICATED IN THE ABOVE TABLE IS 
MOST PROBABLY AT FAULT. ®UT IF THAT CHIP IS 
4 REPLACED AND THE ERROR PERSISTS THEN SUPPOSE 
5 THAT BIT IS, 
LN WHERE 'L* IS A, B, C OR D 
9 
0 


WRPEPSPONSNSNONONONa — S Se SS oO 
—DOOwous 33 


OPE EEE COE ES Cette ee SS 
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2.) IF THERE ARE FOUR CONSECUTIVE BITS IN ERROR, 
FOLLOWING THE PATTERN: 
LN, LN+1, LN¢#2 AND LN+#3 WHERE ‘L* IS A, 8B, C UR D 
N= 8 OR 1) 


LNA 
wn 


THEN THE ABOVE TABLE SHOULD DIRECTLY 
IDENTIFY THE FAILING CHIP. 


O- OO >. -O- 
OO VHRAR 


THIS IS A TEST OF FSRC MODE 0 WITH ACCUMULATORS 6 
AND ‘ USE OF EITHER OF THESE NON-EXISTENT 
ACCUMULATORS SHOULD RESULT IN A TRAP TO 244 WITH 
FEC=2 (ILLEGAL FPP INSTRUCTION). 


$89 eS S 


640 
641 3.) IF FOUR BITS ARE DROPPED WHICH FIT THE 
b4¢ PATTERN: 
| 644 AN, BN, CN AND DN WHERE N=15, 14, ... OR O 
| oF OR 0 
| 647 THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
| 648 WITH EACH OF THE BITS AN, BN, CN AND DN 
663 COULD BE AT FAULT WITH EQUAL PROBABILITY. 
651 4.) IF 16 BITS ARE IN ERROR, FITTING’ THE 
036 PATTERN: 
654 AN, AN+1, AN+2, AN+3 WHERE N=0, 4, 8 OR 12 
655 BN, BN+1, BN+2, BN+3 
656 CN, CN+1, CNt2, CN+3 
657 AND 
$28 DN, DN+t1, DN+2, AN+3 
660 THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
661 WITH THESE BITS COULD BE AT FAULT WITH EQUAL 
662 PROBABILITY. 
664 5.) IF THE FAILING BIT PATTERNS DISPLAYED IN [HE 
665 "AND * "OR' DATA TYPED IN THE S 
666 DOES NOT CONFORM EXPLICITELY TO ANY OF THE 
667 ABOVE PATTERNS, THEN THE TROUBLE SHOOTER 
668 MUST INTUITIVELY TRY TO FIND WHICH OF THE 
669 ABOVE CASES (1 THROUGH 4) IS A "BEST FIT* OF 
670 THE SYMPTOMS. 
67 TEST 12 FPP ACCUMULATORS DUAL ADDRESS TEST 
674 
675 THIS TEST PERFORMS A DUAL ADDRESSING TEST ON THE 
676 FLOATING ACCUMULATORS. NOTE THAT ACCUMULATOR ZERO 
ore IS USED TO ACCESS ALL THE OTHERS. 
6 TEST 13 FSRC MODE 0 WITH ILLEGAL ACCUMULATOR TEST 


aed 
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A ES ES a ee em 


FSRC MODE 2 TEST 


THIS IS A TEST OF FSRC MODE 2, AUTO INCREMENT MODE. 
FSRC MODE 4 TEST 


THIS IS A TEST OF FSRC MODE 4, AUTO DECREMENT MODE. 
FSRC MODE 2, WITH FD=0, TEST 


THIS IS A TEST OF FSRC MODE 2 WITH FD=0. (AUTO 
INCREMENT ) 


FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 


THI 


S IS A TEST OF FSRC MODE 2 USING GR7 (THE PC). 
THIS IS 


IMMEDIATE MODE. 
FSRC MODE 3 TEST 


THIS IS A TEST OF FSRC MODE 3, AUTO INCREMENT 
DEFERRED 


FSRC MODE 5 TEST 


THIS IS A TEST OF FSRC MODE 5, AUTO DECREMENT 
DEFERRED. 


FSRC MODE 6 TEST 


THIS IS A TEST OF FSRC MODE 6, INDEX MODE 
FSRC MODE 7 TEST 


THIS IS A TEST OF FSRC MODE 7, INDEX DEFERRED MODE. 


15 
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781 TRIED. NOTE ECAC) IS PESS. THEN E(FSRC) 


é ; TEST 24 (BUT EZBT Y8),(BUT ENBT) AND (BUT FIUV) TEST 
731 
73 THIS IS A TEST = THE (BUT EZBT Y8) FORK, THE (8uT 
73 ENBT) F ORK AND (BUT FIUV) FORK IN THE LOAD 
734 INSTRUCTION FLOWS. 
735 EACH OF THE PATTERNS: 
736 
737 0 
738 +NUM 
739 -NUM 
ne . 
74 IS LOADED TWICE, —~ WITH AC>O THEN WITH AC=0. 
74 AFTER EACH LOAD THE FPS IS CHECK TO INSURE THAT 
| og: CONTROL WAS PASSED THROUGH wITH THE FORKS PROPERLY. 
| oe TEST 25 ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 
748 
ey THIS IS A TEST OF ADD AND SUB WITH FSRC=AC=0 
ie} TEST 26 ADDD AND SUB WITH FSRC=0 
75 
eee THIS IS A TEST OF ADD AND SUB WITH FSRC=-0. 
756 TEST 27 SUBD WITH AC=0 TEST 
Be 
759 THIS IS A TEST OF SUBD WITH AC=0. BOTH POSITIVE AND 
60 NEGATIVE FSRC‘S ARE TRIED. 
762 TEST 30 ADDD WITH AC=0 TEST 
17 eeeeeses  j-- 1 ii «&sSH#@esG@eeseueoesenean 
182 POSITIVE AND NEGATIVE FSRC‘S ARE TRIED. 
tA TEST 31 ADDF AND ADDD WITH ECAC)=E(FSRC) AND (BUT FT) TEST 
769 
770 THIS IS A TEST OF THE ADD INSTRUCTION WITH THE 
771 OPERANDS HAVING EQUAL EXPONENTS. THE (BUF FT) FORK 
re IN THE ROUND/TRUNK FLOWS IS ALSO TESTED. 
or TEST 32 ADDF AND ADDD WITH E(AC) LESS THAN E(FSRC) TEST 
776 
777 THIS IS ATEST OF THE ADDD AND os INS TONE TIONS AND 
778 THE ALIGN AC ALGORITHM FLOWS. THE CONSTANT (25 FOR 
779 FLOATING, 57 FOR DOUBLE) ree IS CHECKED. THEN 
780 SIMPLE AND WORST CASE ALIGNMENT SITUATIONS ARE 


el eee —_ 


ET — 
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TEST 33 


TEST 34 


ADDF AND ADDD WITH ECAC) GREATER THAN E(FSRC) TEST 


THIS IS A TEST OF THE ADDD AND ADDF pe oe doe AND 
THE ALIGN FSRC ALGORITHM FLOWS. FIRST THE CONSTANT 
USED IS CHECKED. THEN SIMPLE AND WORST CASE 
ALIGNMENT ey! py ARE TRIED. NOTE ECAC) IS 
GREATER THAN E(FSRC). 


ADDD WITH NEGATVE OPRANDS TEST 


THIS IS A TEST GF THe ADDD INSTRUCTION WITH NEGATIVE 
——— EVERY COMBINATION OF OPERAND SIGNS IS 


SUBD TEST 


THIS IS A TEST OF THE SUBD INSTRUCTION. BOTH A 
— AND A NEGATIVE NUMBER IS SUBTRACTED FROM IT 


NORMALIZE ALGORITHM TEST 


THIS IS A TEST OF THE NORMALIZE FLOW ALGORITHM. TWO 
PATTERNS ARE USED, FIRST THE MINIMUM SITUATION 
REQUIRING ONE LEFT SHIFT AND THEN THE MAXIMUM 
SITUATION REQUIRING 56 SHIFTS. 


re rr ee em 


SEQUENCE 


17 


Se 
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gsgssssess 


CONA ULSAN —-OOO~n 


ovowoowovowovonsd 
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1 


0. 


LISTING 


ME 
NLIST MD .MC ,CND 


PITTI TT Lith) hd Lh a A A A eA A A A 
iy) he ee te Ae et At dl tA el et ded ed del et del ded ded ld, dd 


‘kkakkkhkkkkkkkkkekhe S$EOP ceeekekeee eee eee 
o “ 


> .$EOP IS USED TO HANDLE THE END OF A PASS 


“ARGUMENTS ARE: 


*1) 


2) 


3) 


4) 


5) 


“NOTE : 


1) 


ee ee a me eo er re = 


:2) 


ADR -- 


NUM -- 


OPTION -~- 


INSTR1 == 


INSTRe == 


WILL RETURN TO ADR IF NON-BLANK 
WILL RETURN TO 200 IF BLANK 


SPECIFIES THE NUMBER OF “a PASSES 
BEFORE INDICATING AN END OF PROGRAM 
NOTE: IF BLANK IT DEFAULTS TO 1 


SPECIFIES HOW THE END OF PROGRAM IS TO BE INDICATED. 
THE AVAILABLE ARGUMENTS AND THEIR INDICATIONS ARE: 
1) BELL RING TTY BELL 


2) END TYPE ‘END PASS" 
3) PASCNT TYPE "END PASS #XXXXX"" 
WHERE XXXXX IS A DECIMAL NUMBER 
4) ENDPAS IS THE NAME OF A MACRO THAT 
MUST BE DEFINED IN THE USERS 
eo es 
5) REPORT E “END PASS ee aan ERRORS 


SINCE LAST REPORT YYY 
WHERE XXXXX AND YYYYY v ARE DECIMAL NUMBERS 


THE DEFAULT IS NO INDICATION 


THIS WILL BE THE FIRST INSTRUCTION IF NON-BLANK 
SCOPE WILL BE THE FIRST INSTRUCTION IF BLANK 


THIS ARGUMENT ALLOWS So TO BE INSERTED BETWEEN 
THE TESTING OF LOCATI AND THE “RESET” | ve vs 
INSTRUCTION IMMEDIATELY PRECEEDING THE “"XXDP** OR *‘ACT11 
RETURN LINKAGE. 

NOTE: CAN BE A MACRO 


THIS ROUTINE IS CONDITIONALLY ASSEMBLED BY $SWR FOR SWR<12> 
“ ROUTINES REQUIRED: 

TYPE AN ASCIZ STRING (.$TYPE) DEPENDING ON $SWR 

CHANGE BINARY TO DECIMAL AND TYPE (.$TYPDEC). 


OR 


en ech WHEN ‘OPTION’ IS DEFINED AS ‘‘PASCNT"’ 
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7 ; 
eat {RARER AAA AARAAAAAE AAA RAR AAAATAARAARAARAAARAARR ARE 
1771 000000 -ENABL ABS 
177 -MCALL .HEADER,.SWRHI],.EQUAT,.SETUP,.$CATCH, .$ACT11,.$CMTAG 
177 -MCALL .S$TYPE,. 
1774 -MCALL .STYPDEC,.$TRAP, .SPOWER, .SAPTHDR, .SAPTBLS 
1775 on . SAPTYPE, .SREAD 
177 MCAL -EQUIV :*REMOVE FOR ASSEMBLY ON PDP-10 
177 -TITLE ce PPABO EPTIE FLTG PNT PRT A 
>*COPYRIGHT (C) 1981 


:*DIGITAL EQUIPMENT CORP. 
:*MAYNARD, MASS. 71754 


-* 


S eTHIS PROGRAM WAS ASSEMBLED oe THE PDP=11 MAINDEC SYSMAC 
: *PACKAGE (MAINDEC-11=DZQAC-C5), » VN 


000001 $TN=1 
160000 $SWR=160000 ::HALT ON ERROR, LOOP ON TEST. INHIBIT ERROR TYPOUT 
1778 000244 FPVECT=244 
1779 177600 $SWR=177400 
1780 000200 $SWRMSK=200 
1781 000011 TAB=11 
1782 000015 CRLF=15 
1783 .SBTTL BASIC DEFINITIONS 
;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *## 
001100 STACK= 1100 
104000 ERROR=EMT 
000004 SCOPE=IOT 
:*MISCELLANEOUS DEFINITIONS 
000011 HT= 11 ::CODE FOR HORIZONTAL TAB 
000012 LF= 12 -:CODE FOR LINE FEED 
000015 CR= 15 >:CODE FOR CARRIAGE RETURN 
000200 CRLF= 200 >: CODE FOR CARRIAGE RETURN-LINE FEED 
177776 PS= 177776 =:PROCESSOR STATUS WORD 
177776 PSW=PS 
177774 STKLMT= 177774 ::STACK LIMIT REGISTER 
177772 PIRQ= 177772 > =PROGRAM INTERRUPT REQUEST REGISTER 
177570 DSWR= 177570 ; HARDWARE SWITCH REGISTER 
177570 DDISP= 177570 HARDWARE DISPLAY REGISTER 
= *GENERAL PURPOSE REGISTER’ DEFINITIONS 
000000 RO= %0 : :GENERAL REGISTER 
000001 R1= 1 * GENERAL REGISTER 
000002 R2= %2 > GENERAL REGISTER 
000003 R3= 13 > :GENERAL REGISTER 
000004 R4= 1,  :GENERAL REGISTER 
R5= Z5 ; ;GENE TER 
000006 R6= 16 - GENERAL REGISTER 
000007 R7= %7 - : ;GENERAL REGISTER 
000006 SP= 16 ::STACK POINTE 
000007 PC= 47 “PROGRAM COUNTER 
:*PRIORITY LEVEL DEFINITIONS 
000000 PRO= 0 ::PRIORITY LEVEL 0 
000040 PRi= 40 -:PRIORITY LEVEL 1 
00100 PR2= Hy : ;PRIORITY tEVEL ¢ 
000140 PR3= 140 : PRIORITY LEVEL 
00 PR4= 200 >:PRIORITY LEVEL 4 


nnn 


ee - 
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000240 


000001 
100000 
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PR5= 240 ::PRIORITY LEVEL 5 

PR6= 300 fia + LEVEL 6 

PR7= 340 " PRIORITY LEVEL 7 

«SWITCH REGISTER SWITCH DEFINITIONS 

but W15= 100000 

SwW14= 400 

Swi3= 200 

Swi2= 10000 

SWii= 400 

Swi0= 2000 

swo9= 1000 

swo8= 400 

SWG7= 200 

SwO6= 100 

swo5= 40 

Sw04= 20 

SwO3= 10 

SWO2= 4 

SwOl= 2 

sw0c= 
SW9=SWO9 
SW8=Sw08 
SW7=Sw07 
SW6=S 
Sw5=Sw05 
SW4= 
SwW3=SwW03 
W2=Sw02 
SW1=SW01 
wO=Sw0 

:*DATA BIT DEFINITIONS (BITOO TO BIT15) 

BIT15= 100000 

BIT14= 40000 

BIT13= 20000 

BIT12= 10000 

BIT11= 4000 

BIT10= 2000 

BITO9= 1000 

BITO8= 400 

BITO7= 200 

BIT06= 100 

BITOS= 40 

BITO04= 20 

BITO3= 10 

BITO2= 4 

BITO1= 2 

BITOO= 1 
BIT9=BITO9 
BIT8=BI1T08 
BIT7=BIT07 
B1IT6=B1T06 
B1T5=B1T05 
BIT4=BIT04 
B1T3=B1T03 
BIT2=BIT02 
BIT1=B]T01 
B1IT0=B1T00 
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BASIC DEFINITIONS 


;*BASIC *CPU"’ TRAP VECTOR _ADDRESSES 


000004 ERRVEC= OUT AND OTHER ERRORS 
000010 RESVEC= 1 : [RESERVED AND ILLEGAL INSTRUCTIONS 
000014 TBITVEC=14 33.5. er 
000014 TRIVEC= 14 7; TRACE TRAP 
000014 BPTVEC= 14 : ONPUT/OUTP TRAP (BPT 
000020 IOTVEC= 2 + IN NPUT/OUTPUT TRAP (JOT) **SCOPE** 
000024 PWRVEC= 24 POWER FAIL 
000030 EMTVEC= 30 : EMULATOR TRAP (EMT) **ERROR** 
| 090034 TRAPVE C=34 RAP" 
TKVEC= 60 :eTTy KEYBOARD VECTOR 
000064 TPVEC= 64 oY PRINTER VECTOR 
000240 PIRQVEC=240 PROGRAM INTERRUPT REQUEST VECTOR 
1784 ~SBTTL FPP REGISTER DEFINITIONS 
1785 000000 ACO =%0 
1786 000001 AC =%1 
1787 000002 AC2 =%2 
1788 000003 AC3 =%43 
1789 000004 AC4 =24 
1790 000005 AC5 =%5 
1791 000006 AC6 =%6 
1792 000007 AC7 =%7 
1794 ~SBTTL TRAP CATCHER 
000000 
; *ALL UNUSED LOCATIONS FROM 4 ~ 776 CONTAIN A *'.+2,HALT"’ 
: sSEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPT 
000174 Pome 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
000174 000000 DISPREG: .WORD 0 ;sSOFTWARE DISPLAY REGISTER 
000176 000000 SWREG: .WORD 0 ;sSOFTWARE SWITCH REGISTER 


.SBTTL STARTING ADDRESS(ES) 
000200 0001357 003616 JMP @A4START ;; JUMP TO STARTING ADDRESS OF PROGRAM 
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COMMON TAGS 


1795 .SBTTL COMMON TAGS 
£ TEAS AAAAAAAAAARARAAARAARAAAAAAEAARAAKAAAAAAAAAAAAARAARRAERARAERA EE 
-*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
**USED IN THE PROGRAM. 


001100 -=1100 
001100 SCMTAG: :;START OF COMMON TAGS 
901100 000000 -WORD 0 
001102 STSTNM: .BYTE 0 ;;CONTAINS THE ey NUMBER 
001105 000 SERFLG: .BYTE 0 Bhs iy ERROR FLAG 
001104 090000 SICNT: .WORD 0 ;;CONTAINS SUBTEST ITERATION COUNT 
001106 SLPADR: .WORD 0 ;sCONTAINS SCOPE LOOP ADDRES 
001110 000000 SLPERR: .WORD 0 :;CONTAINS SCOPE RETURN FOR ERRORS 
001112 000000 SERTTL: .WORD 0 ;-CONTAINS TOTAL ERRORS DETECTED 
001114 0 SITEMB: .BYTE 0 ;;CONTAINS ITEM CONTROL BY 
001115 001 SERMAX: .BYTE 1 ;sCONTAINS MAX. ERRORS PER TEST 
001116 SERRPC: .WORD 0 : CONTAINS PC OF LAST ERROR = 
001120 0 SGDADR: .WORD 0 ;;CONTAINS ADDRESS OF ‘GOOD* DAT 
001122 000000 $BDADR: .WORD 0 SS ONTAING ADDRESS OF "BAD" DATA. 
001124 000000 $GDDAT: .WORD 0 ;CONTAINS ‘GOOD* He 
001126 000000 SBDDAT: . 0 :CONTAINS "BAD' DATA 
001130 000000 WORD 0 : ERESERVED=-NOT TO BE USED 
0011352 000000 -WORD 0 
001134 000 $AUTOB: .BYTE 0 ; AUTOMATIC MODE INDICATOR 
001135 000 SINTAG: .BYTE 0 :; INTERRUPT MODE INDICATOR 
001136 000000 WORD 0 
001140 177570 SWR : -WORD DSWR : sADDRESS OF SWITCH REGISTER 
001142 177570 DISPLAY: .WORD DDISP : sADDRESS OF DISPLAY REGISTER 
001144 177560 $TKS: 177560 saTTy KBD STATUS 
001146 177562 $TKB: 177562 TTY KBD BUFFER 
‘001150 177564 $TPS: 177564 ::TTY PRINTER STATUS REG. ADDRESS 
001152 177566 $TPB: 177566 ;;TTY PRINTER BUFFER REG. ath 
001154 000 $SNULL: .BYTE 0 ;sCONTAINS NULL CHARACTER FOR FILLS 
001155 002 SFILLS: .BYTE ? ::CONTAINS # OF FILLER CHARACTERS REQUIRED 
001156 012 SFILLC: .BYTE 12 7 INSERT FILL CHARS. AFTER A ‘'LINE FEED" 
001157 000 STPFLG: .BYTE 0 :""TERMINAL AVAILABLE'’ a. (BIT<07>=0=YES) 
001160 000000 SREGAD: .WORD 0 7 CONTAINS THE ADDRESS FROM 
;;WHICH (S$REGO) WAS OBTAINED 
000024 REPT $CM3 

001162 000000 SREGO: .WORD 0 :;CONTAINS (($REGAD) +0) 
001164 000000 SREG]: .WORD 0 ;:CONTAINS (($REGAD) +2) 
001166 000000 SREG2: .WORD 0 ;;CONTAINS (($REGAD) +4) 
001170 000000 SREGS: .WORD 0 ;;CONTAINS (($REGAD) +6) 
001172 000000 SREG4: .WORD 0 ;: CONTAINS (($REGAD) +10) 
001174 000000 $SREG5: .WORD 0 :: CONTAINS ((S$REGAD) +12) 
001176 000000 SREG6: 0 :;CONTAINS (($REGAD) +14) 

1200 000000 SREG7: .WORD 0 CONTAINS (($REGAD) +16) 
001202 0 SREGIO: .WORD 0 CONTAINS (($REGAD) +20) 
001204 000000 $REG11: .WORD 0 CONTAINS (($REGAD) +22) 
001206 000000 SREGI2: .WORD 0 CONTAINS (($REGAD) +24) 
001210 000000 $REG15: .WORD 0 ::CONTAINS (($REGAD) +26) 
001212 000000 $REGI4: .WORD 0 CONTAINS ((S$REGAD) +30) 
001214 000000 SREGI5: .WORD 0 CONTAINS (($REGAD) +32) 
Opi So6 000000 SREG16: .WORD 0 CONTAINS (($REGAD) +34) 
001220 000000 SREGI7: .WORD 0 ::CONTAINS (($REGAD) +36) 
001222 0 $REG20: .WORD 0 7: CONTAINS (($REGAD) +40) 
001224 0 SREG2i: .WORD 0 ; CONTAINS (($REGAD) +42) 
001226 000000 $REG22: .WORD 0 CONTAINS (($REGAD) +44) 
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COMMON TAGS 


001230 000000 SREG23: .WORD 0 ::CONTAINS ((SREGAD) +45) 
000024 -REPT 24 
001232 000000 $ : WORD 0 ::USER DEFINED 
001 900000 STMP1: .WORD 0 > USER DEFINED 
001 S$TMP2: .WORD 0 > :USER DEFINED 
001240 0000006 STMP3: .WORD 0 =: USER DEFINED 
901242 000000 S$TMP4: .WORD 0 =:USER DEFINED 
001244 000000 STMP5: .WORD 0 =: USER DEFINED 
001246 000000 STMP6: .WORD 0 = :USER DEFINED 
001250 090000 $TMP7: .WORD 0 3 DEFINED 
001252 000000 $TMP10: .WORD 0 > USER DEFINED 
001254 000000 $TMP11: .WORD 0 *:USER DEFINED 
001256 000000 $TMP12: .WORD 0 > :USER DEFINED 
001260 000000 $TMP13: .WORD 0 *:USER DEFINED 
001262 000000 STMP14: .WORD 0 = :USER DEFINED 
001264 000000 S$TMP15: .WORD 0 >:USER DEFINED 
001266 000000 STMP16: .WORD 0 28 DEF INED 
001270 0 $TMP17: .WORD 0 >: USER DEFINED 
001272 000000 STMP20: .WORD 0 *:USER DEFINED 
001274 0 STMP21: .WORD 0 > USER DEFINED 
001276 000000 $TMP22: .WORD 0 =:USER DEFINED 
001300 STMP23: .WORD 0 ;7USER DEFINED 
001302 000000 S$TIMES: 0 =MAX. NUMBER OF ITERATIONS 
001304 000000 SESCAPE :0 =:ESCAPE ON ERROR ADDRESS 
001306 207 377 377 $BELL: .ASCIZ <207><377><377> ::CODE FOR BELL 
001312 077 $QUES: .ASCII /2/ : QUESTION MARK 
001313 015 SCRLF: . ASCII <i5> ;: CARRIAGE RETURN 
001314 012 000 SLF: .ASCIZ <12> FEE 
WTTITITIVT ITI LILI T TLL LILI LILI LLL ELL LLL LL LLL LL 
*S8TTL APT MAILBOX-ETABLE 
SERRA AEEEEEKREKEKREKEEREAREEKEAEKKKEEEKEKEERAEKEKEKEKEEKEEREKEREEEEEKEEERE 
* EVEN 
001316 SMAIL: ;sAPT MAILBOX 
001316 000000 SMSGTY: .WORD AMSGTY ::MESSAGE TYPE CODE 
001320 000000 SFATAL: .WORD AFATAL ;7FATA L ERROR NUMBER 
001322 000000 STESTN: .WORD ATESTN ::TEST NUMBER 
001324 000 SPA D ::PASS COUNT 
001326 000000 SDEVCT: .WORD ADEVCT ;::DEVICE COUNT 
001330 000000 $UN WORD ::1/0 UN 
001332 000000 SMSGAD: .WORD AMSGAD ::MESSAGE ADDRESS 
001334 000000 S$MSGLG: .WORD AMSGLG ::MESSAGE LENGTH 
001336 SETABLE: 33 ENVIRONMENT TABLE 
001336 000 SENV: .BYTE AENV  ;; ENVIRONMENT 
001337 000 SENVM: .BYTE AENVM  ;::ENVIRONMENT MODE BITS 
01340 000000 SSWREG: .WORD ASWREG ::APT SWITCH REGISTER 
01342 000000 SUSWR: .WORD AUSWR ::USER SWITCHES 
001344 000000 $CPUOP: .WORD ACPUOP ::CPU TYPE,OP TIGNS 
;* BITS 15-115 =CPU TYPE 
3* 11/04=01, "11/05= 02,11/20=03, 11/40= 04, 11/45=05 
;* 11770206°P Ppa=07,0=10 
i* BIT 10=REAL TIME CLOCK 
* BIT 9=FLOATING POINT PROCESSOR 
i BIT 8=MEMORY MANAGEMENT 
001346 000 $MAMS1: .BYTE AMAMS1 ;:HIGH ADDRESS,M.S. BYTE 
001347 000 $MTYP1: .BYTE AMTYP1 ::MEM. TYPE.BLKA#1 
: MEM.TYPE BYTE =~ (HIGH BYTE) 


L 
CKFPADO FPIIF FLTG ENT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 50-5 SEQUENCE 24 


APT MAILBOX~-E TABLE 


7* 900 NSEC CORE=001 
:* 300 NSEC BIPOLAR=002 
s@ 500 oes aa 003 
0013550 00000 SMADR1: .WORD AMADR1 ;;HIGH ADDRESS,BLK#1 
:* MEM.LAST ADDR. 5 hit f THIS WORD AND LOW OF *'‘TYPE'’ ABOVE 
OO 308 006 SMAMS2: .BYTE AMAMS2 ;;HIGH ADDRESS,M.S. BYTE 
00135 SMTYP2: .BYTE AMTYP2 > sMEM. TYPE, 
001354 SMADR2: .WORD AMADRC ;;MEM.LAST ae et’ ee 
001356 000 $MAMS3: .BYTE AMAMS3 ::HIGH ADDRESS,M.S.BYT 
001357 000 SMTYP3: .BYTE AMTYPS : :MEM. TYPE ,BLKA3 
001 SMADR3: .WORD AMADR3 -LAST ADDRESS ,BLK&#3 
001 SMAMS4: .BYTE AMAMS4 z3H HIGH ADDRESS,M.S.BYTE 
001 000 SMTYP4: .BYTE AMTYP4 ::MEM.TYPE,BLKA4 
001364 SMADR4: .WORD AMADR4 : MEM. LAST ADDRESS ,BLK&4 
001366 000000 SVECT1: .WORD AVECT1 sie ERRUPT VECTOR#1,BUS PRIORITY#1 
001370 $VECT2: :WORD AVECT2 ::INTERRUPT VECTOR#2BUS PRIORITYA#2 
001372 000000 $BASE: .WORD ABASE ; 3BASE ADDRESS OF EQUIPMENT UNDER TEST 
001374 000000 SDEVM: .WORD ADEVM VICE MAP 
001376 0 $CDW1: .WORD ACDW1 ; CONTROLLER DESCRIPTION WORDA1 
001400 000000 $CDW2: .WORD ACDW2 ONTROLLER DESCRIPTION WORDA&2 
001402 000000 $DDWO: .WORD ADDWO ;:DEVICE DESCRIPTOR WORDAO 
001404 000 SDDW1: .WORD ADDWI ;;DEVICE DESCRIPTOR WORD#1 
001406 000000 $DDW2: .WORD ADDW2 ;;DEVICE DESCRIPTOR WORDA2 
001410 000000 $DDW3: .WORD ADDWS ;;DEVICE DESCRIPTOR WORDAS 
001412 000000 SDDW4: .WORD ADDW4 ;;DEVICE DESCRIPTOR WORD#4 
001414 000000 $DDW5: .WORD ADDWS5 ;;DEVICE DESCRIPTOR WORDS 
001416 000000 SDDW6: .WORD ADDW6 ;;DEVICE DESCRIPTOR WORD#6 
001420 000000 $DDW7: .WORD ADDW7 ;;DEVICE DESCRIPTOR WORDA#7 
001422 000000 SDDW8: .WORD ADDWB ;;DEVICE DESCRIPTOR WORDS 
001424 000000 SDDW9: .WORD D DEVICE DESCRIPTOR WOR 
001426 000000 $DDW10: .WORD W10 ;;DEVICE DESCRIPTOR WORD#10 
001430 000000 SDDW11: .WORD ADDW11 ;;DEVICE DESCRIPTOR WORDA11 
001432 000000 SDDWi2: .WORD ADDWi2 ;;DEVICE DESCRIPTOR WORD#12 
001434 000000 $DDW13: .WOR ADDW135 ;;DEVICE DESCRIPTOR WORDA#13 
001436 000000 SDDW14: .WORD ADDW14 : DEVICE DESCRIPTOR WORDA14 
Boe 000000 og ote -WORD ADDW15 ;;DEVICE DESCRIPTOR WORDA15 
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ERROR POINTER TABLE 


-SBTTL ERROR POINTER TABLE 

7*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN _~- 

Z*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND 

>*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE 5 PERTINENT. 


: *NOTE1: IF $ITEMB IS 0 THE ONLY PERTINENT DATA IS (SERR 
; *NOTE?: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS PRPLAINED AS FOLLOWS: 
: Ef ::POINTS TO THE ERROR MESSAGE 
cs DH ;POINTS TO THE DATA HEADER 
:* DT POINTS TO THE DATA 
: DF :=POINTS TO THE DATA FORMAT 
001442 SERRTB: 

1802 001442 045352 065631 072314 “WORD £M1,DH1,DT1,DF1 sERROR ITEM # 1 
00145¢ 045407 065721 072336 "WORD EM2.DH2.DT2.DF2 “ERROR ITEM # 2 
00146 045453 066014 072360 “WORD £&M3,DH3,DT3,DF3 “ERROR ITEM # 3 
001472 045520 105 072360 “WORD &M4.DH4,DT4.DF4 “ERROR ITEM # 4 
001502 045560 066201 072402 W 5.DH5,DT5,DF5 “ERROR ITEM # 5 
001512 045614 066201 072434 D EM6.DH6.DT6.DF6 “ERROR ITEM # 6 
001522 045646 066201 072434 W “DT7,DF7 “ERROR ITEM # 7 
001532 045560 066201 072434 WORD €£M10,DH10,DT10,DF 10 “ERROR ITEM # 10 
001542 045701 066201 072434 WORD €M11.DH11.DT11.DF11 “ERROR ITEM # 11 
00155 000000 072456 WORD *DH12.DT12.DF 12 ERROR ITEM # 12 
001562 00 000000 672544 WORD £M13,DH13,D113,DF13 “ERROR ITEM # 13 
001572 045762 066 072434 “WORD EM14.DH14,D1T14,DF14 “ERROR ITEM # 14 
001602 046105 066201 072434 RD  £M15.DH15.DT15.DF15 “ERROR ITEM # 15 
001612 046230 066241 072576 “WORD £M16,DH16,D116.DF 16 “ERROR ITEM # 16 
001622 046301 066321 072360 D £&M17.DH17.D117.DF17 “ERROR ITEM # 17 
001632 046534 066411 072616 WORD &M20,DH20,DT20.DF20 “ERROR ITEM # 20 
001642 046712 066201 072640 D CE ,DT21,DF21 “ERROR ITEM # 21 
001652 047043 066477 072652 WORD EMZ2. D2. DT22.. DE ce “ERROR ITEM # 22 
001662 043 066534 072700 "WORD EM23.DH23.DT23.DF2 “ERROR ITEM # 23 
001672 047043 066672 072722 “WORD £EM24,DH24.DT24.DF 24 “ERROR ITEM # 24 
001702 047130 067031 072746 “WORD £EM25,DH25,0T25,DF25 SERROR ITEM # 25 
001712 047243 067073 073016 “WORD EM26,DH26.DT26.DF 26 “ERROR ITEM # 26 
001722 047243 . 067073 073072 -WORD &M27,DH27,DT27,DF27 *ERROR ITEM # 27 
001732 047311 000000 073134 “WORD £&M30,DH30,DT30,DF 30 “ERROR ITEM # 30 
001742 047363 067073 073016 .WORD £&M31,DH31,DT31,DF31 “ERROR ITEM # 31 
001752 047363 067073 073072 “WORD £&M32,DH32,DT32,DF 32 *ERROR ITEM # 32 
001762 047431 067161 073166 “WORD €&M33.DH33,0133,DF33 “ERROR ITEM # 33 
001772 047472 073244 WORD £M34,DH34,D134,DF “ERROR ITEM # 34 
002002 047574 067161 073244 “WORD £M35.DH35.DT35,DF 35 *ERROR ITEM # 35 
002012 047676 073244 “WORD £M36,DH36,DT36,DF36 “ERROR ITEM # 36 
002022 047777 067161 073244 “WORD €M37.DH37,D137,DF 37 “ERROR ITEM # 37 
002032 050100 067161 073166 “WORD £M40,DH40,DT40,DF40 “ERROR ITEM # 40 
002042 050251 000000 073316 “WORD £M41.DH41,D1T41.DF41 “ERROR ITEM # 41 
002052 050306 067264 073350 “WORD &M42,DH42,0T42,DF42 “ERROR ITEM # 42 
002062 050427 64 073350 “WORD £EM43.DH43,0143,DF43 “ERROR ITEM # 43 
002072 050550 000000 073426 “WORD  £&M44,DH44,D144.DF44 “ERROR ITEM # 44 
002102 050550 067366 073476 “WORD £M45.DH45.D145.DF45 “ERROR ITEM # 45 
002112 050613 067405 073552 “WORD &M46.DH46,D146.DF46 “ERROR ITEM # 46 
002122 050671 067366 07364 “WORD £M47.DH47.D147.DF47 *ERROR ITEM # 47 
002132 051007 067431 07324 “WORD £&M50,DH50,DT50,DF50 “ERROR ITEM # 50 
002142 051105 067431 073672 -WORD EM51,DH51,DT51,DF51 “ERROR ITEM # 51 
002152 051146 066201 073640 “WORD M52, 32 -DI92.DF 52 “ERROR ITEM # 52 
002162 051267 067073 073739 WORD &M53,DH53,D153,DF53 “ERROR ITEM # 53 
002172 051464 067503 073750 WORD £M54.DH54.D154.DF54 “ERROR ITEM # 54 
002202 051530 066201 073640 “WORD £M55.DH55,D155,DF55 “ERROR ITEM # 55 
002212 051651 067073 073730 "WORD £M56.DH56,D156,DF 56 “ERROR I1EM # 56 
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CKFPADO FPIIF FLTG PNT PRT A 
ERROR POINTER TABLE 

00 32 052066 067503 073750 -WORD €M57,DHS7,D157,DF57 sERROR ITEM # 57 

00 052112 067073 073730 "WORD &M60.DH60.DT60.DF60 “ERROR ITEM # 60 

002242 05 067303 073750 "WORD £M61.DH61.DT61.DF61 “ERROR ITEM # 61 

002252 052353 067503 073750 "WORD £M62.DH6 -D162 DE 62 :ERROR ITEM # 6¢ 

002262 052545 067503 073750 "WORD £M63.DH63.D163,DF63 “ERROR ITEM # €: 

002272 052737 067613 074006 RD EM64.DH64.DT64 .DF64 “ERROR ITEM # 64 

30 052737 067544 074 "WORD £EM65.DH65.DT65.DF65 “ERROR ITEM # 65 

002312 053073 067503 073750 WORD 6° DH66.DT66.DF6 “ERROR ITEM # 66 

00 é 053136 066201 072640 WORD £M67.DH67.D167.DF67 “ERROR ITEM # 67 

00 053367 066201 074026 “WORD £M70.DH70.DT70.DF70 “ERROR ITEM # 70 

00 053512 067031 074026 "WORD  £M71.DH71.DT71.DF71 “ERROR ITEM # 71 

002352 053614 067073 074074 "WORD £&M72.DH72.DT72.DF 72 “ERROR ITEM # 72 

00 053670 067503 073750 "WORD £M73.DH73.D173,DF73 ZERROR ITEM # 73 

002372 053730 066201 072640 “WORD &M74.DH74.DT74.DF74 “ERROR ITEM # 74 

002402 054161 066201 074026 "WORD £M75.DH75.D175.DF75 “ERROR ITEM # 75 

00261 054304 067031 074026 "WORD &M76.DH76.DT76.DF76 “ERROR ITEM # 76 

00 42 054406 067073 074074 "WORD EM77.DH77.DT77.DF77 “ERROR ITEM # 77 

0024 : 054462 067503 073750 "WORD £M100,DH100,DT100, DF 100 sERROR ITEM # 100 
002442 054522 201 074026 "WORD £M101.DH101.DT101 .DF101 “ERROR ITEM # 101 
002452 054646 067073 074026 "WORD £M102.DH102.DT102.DF102 “ERROR ITEM # 102 
002462 054720 067031 074026 WORD £&M103.DH103.DT103,DF103 “ERROR ITEM # 103 
002472 055023 067503 073750 WORD £M104.DH104.DT104.DF104 “ERROR ITEM # 104 
00 30 055064 066201 74026 "WORD £M105.DH105.DT105.DF105 “ERROR ITEM # 105 
002512 055211 067073 074074 WORD £M106.DH106.DT106.DF 106 “ERROR ITEM # 106 
002520 055264 067031 074026 WORD £M107.DH107.DT107.DF 107 “ERROR ITEM # 107 
002532 055370 067503 073750 WORD €&M110.DH110.DT110.DF110 “ERROR ITEM # 110 
002542 055432 067031 074114 "WORD €M111.DH111.DT111.0F111 “ERROR ITEM # 111 
002552 055432 067701 074114 "WORD £M112.DH112.DT112.DF112 “ERROR ITEM # 112 
002562 055534 067031 074114 WORD €M113.DH113,DT113,DF113 “ERROR ITEM # 113 
002572 055534 067701 074114 WORD £M114.DH114.DT114.DF114 “ERROR ITEM # 114 
002602 055432 070120 074114 WORD €M115.DH115.DT115.DF115 “ERROR ITEM # 115 
002612 055534 070120 074114 WORD £M116.DH116.DT116,DF116 “ERROR ITEM # 116 
0026¢0 055636 066321 072360 WORD £M117.DH117.DT117,DF117 “ERROR ITEM # 117 
002632 055772 070404 072360 "WORD £M120.DH120.DT120.DF 120 “ERROR ITEM # 120 
002642 056126 066201 073640 RD £M121.DH121.DT121.DF121 “ERROR ITEM # 121 
002652 056245 067431 073244 WORD £M122.DH122.DT122,DF 122 “ERROR ITEM # 122 
002662 056344 067431 073672 WORD £M123.DH123,DT123,DF 123 “ERROR ITEM # 123 
002672 056405 066321 074126 D  £M124.DH124.DT124.DF 124 “ERROR ITEM # 124 
002702 056500 066321 074126 WORD £M125.DH125.DT125.DF125 “ERROR ITEM # 125 
002712 056570 066201 074114 WORD £&M126.DH126.DT126.DF 126 “ERROR ITEM # 126 
002 7¢2 056777 067503 074114 WORD €&M127.DH127.DT127.DF127 “ERROR ITEM # 127 
002732 057212 070404 072360 D £M130.DH130.DT130.DF130 “ERROR ITEM # 130 
002742 057312 067503 074212 WORD £M131.DH131.DT131.DF131 “ERROR ITEM # 131 
006752 057352 067503 074212 WORD €&M132, H13@.DI13¢.DF132 “ERROR ITEM # 132 
00 06 057412 070474 074254 "WORD £M133.DH133,.D1133,DF 133 “ERROR ITEM # 133 
002772 057451 070474 074254 "WORD £M134.DH134.DT134 DF 134 “ERROR ITEM # 134 
003002 057510 070474 074254 WORD £M135.DH135.DT135 DF 135 “ERROR ITEM # 135 
003012 057547 070474 074254 WORD £M136.DH136.DT136.DF 136 “ERROR ITEM # 136 
003022 057412 070604 074326 WORD £&M137.DH137.D01137.DF 137 “ERROR ITEM # 137 
003032 057451 070604 074326 WORD £M140.DH140.DT140,DF140 “ERROR ITEM # 140 
003042 057510 070604 074326 WORD €M141.DH141.D1T141.DF 141 ERROR ITEM # 141 
003052 057547 070604 074326 WORD £M142.DH142.D1142.DF 142 “ERROR ITEM # 14¢ 
003062 057606 070474 074254 WORD £M143.DH143.D01143,DF 143 “ERROR ITEM # 14 

003072 057641 070474 074254 WORD £M144.DH144.D1144 DF 144 “ERROR ITEM # 144 
003102 057606 070604 074326 "WORD €M145.DH145.DT145.DF145 “ERROR ITEM # 145 
003112 057641 070604 074326 "WORD £M146.DH146.DT146.DF 146 “ERROR ITEM # 146 
00312 057674 067503 074254 - WORD EM147,DH147,D1147,DF 147 sERROR ITEM # 147 
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ERROR POINTER TABLE 
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3602 
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-SBTTL ACT11 HOOKS 


“RRR eeeeeeeaeaeaaaeeaagaaeaetkeeaeteaneneeeaeretenaese 


“HOOKS REQUIRED BY ACT11 
SSVPC=. sSAVE PC 


.=46 
SENDAD ::1)SET LOC.46 TO ADDRESS OF $ENDAD IN .$EOP 
“WORD 0 ::2)SET LOC.52 TO ZERO 

" =$SVPC * RESTORE PC 
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APT PARAMETER BLOCK 


1808 -SBTTL APT PARAMETER BLOCK 


We PARRA SAAASAAALALARLARARAAAAAARARERRAR ARR RARER ARRRRRSERARA RA RAS SSS SES | 


:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


FAA AAEAAEAAAAAAAARARAAAEARAAEARARAAAAAAARAARARAARARARS ATR RAR ARTES 


003602 . $X=. 23 SAVE CURRENT LOCATION 
& .=24 ;SET POWER FAIL TO POINT TO START OF PRUGRAM 
906024 000 200 ;3FOR APT START UP 
& -=44 ;POINT TO APT INDIRECT ADDRESS PNITR. 
000044 00 SAPTHDR ::POINT TO APT HEADER BLOCK 
0.5360 -=.$X ;;RESET LOCATION COUNTER 


Iti ttiteti siti itetiiitiiiiiiiitit iii 
“SE TUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
INTERFACE SPEC. 


$aP 
WORD 0 :TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
WORD $MAIL : [ADDRESS OF APT MAILBOX (BITS 0-15) 
10 ::RUN TIM OF LONGEST TEST 
WORD 40 : RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
WORD 0 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
WORD  $ETEND-SMPIL/2 ::LENGTH MAILBOX-ETABLE (WORDS) 


Sssseese 
SESSESS 
3 = 
Ssscc 
eSgre- 
332808 
: 
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INITIALIZE THE COMMON TAGS 


18106 ye INITIALIZE THE COMMON TAGS 


1811 063616 TART 
~SBTTL INITIALIZE THE COMMON TAGS 
::CLEAR THE COMMON TAGS (S$CMTAG) AREA 


00 18 012706 001100 MOV #SCMTAG,RO ::FIRST LOCATION TO BE CLEARED 
026 CLR (R6) + >; CLEAR MEMORY LOCATION 
903624 0227 001140 CMP #SWR,R6 ::DONE? 
1374 BNE Pa ::LOOP BACK IF NO 
003632 072 001100 MOV ACK, SP >:SETUP THE STACK POINTER 
:s INITIALIZE A FEU MYECTORS 
003636 012737 036516 000020 #SSCOPE ,a#1OTVEC :#107 VECTOR FOR SCOPE ROUTINE 
003644 012737 000340 000022 mov #340, @#IOTVEC+2 ::LEVEL 7 
003652 012737 037146 000030 MOV PSERROR a#EMTVEC 2 EMT VECTOR FOR ERROR ROUTINE 
00 012737 000340 000032 MOV #340 SaEMTVEC?D ;:LEVEL 7 
00 012737 041540 000034 MOV STRAP ,a#TRAPVEC :; TRAP VECTOR FOR TRAP CALLS 
003674 012737 000340 000036 MOV #340, @eTRAPVEC+2:( EVEL 7 
003702 012737 041624 000024 MOV #SPWRON, @#PWRVEC ;;POWER FAILURE VECTOR 
003710 012737 900340 000026 MOV #340, aMPWRVEC+2 ::LEVEL 7 
003716 013737 036124 036112 MOV SENDCT,SEOPCT ::SETUP END-OF-PROGRAM COUNTER 
0037 4 005037 001302 CLR STIMES =: INITIALIZE NUMBER OF ITERATIONS 
003730 005037 001304 CLR SESCAPE ;3CLEAR THE ESCAPE ON ERROR ADDRESS 
003734 112737 000001 001115 MOVB #1, SERMAX “ALLOW ONE ERROR PER 7EST 
:: INITIALIZE THE "T-BIT'’ TRAP VECTOR. THEN LOAD LOCATION “$RTRN', IN 
— ‘END-OF-PASS'' (SEOP) ROUTINE, WITH A 'RTI'' OR ‘RTT’ 
003742 012737 036476 000014 MOV #SRIRN, a#TBITVEC :3SET +." BIT VECTOR TO $RTRN 
003750 012737 000340 000016 MOV #3C0. SeIBITVEC #2 se 
003756 012737 000002 036476 MOV #RTI,$RTRN EEF O ShTAN TO A AT 
003764 012737 004012 000010 MOV #65$.aMRESVEC ::TRY TO DOA RIT 
3772 005046 CLR -(SP) >= DUMMY PS 
003774 012746 004002 MOV #64$,~(SP) > > AND PC 
004000 000006 RTT >: TRY THE RTT 
004002 012737 000006 036476 64%: MOV #RTT. SRTRN *:RTT IS LEGAL--SET $RTRN TO A RTT 
004010 000402 BR 663 
004012 062706 000010 65$: ADD #10.S T ILLEGAL--CLEAN OFF THE STACK 
004016 012737 000012 000010 66$: MOV oRESVEC#2, amresvit™ | TRESTORE TRAP CATCHER 
004024 005037 036504 CLR $TBIT -CLEAR ''T’' BIT SWITCH 
004030 012737 004030 001106 MOV #. ,SLPADR i INITIALIZE THE LOOP ADDRESS FOR SCOPE 
004036 012737 004036 001110 MOV #. ,$LPERR -SETUP THE ERROR LOOP ADDRESS 
::SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
=:EQUAL TO A ''=1 SETUP FOR A SOFTWARE SWITCH REGISTER. 
004044 013746 000004 MOV a#ERRVEC,-(SP) : 3 SAVE ERROR VECTOR 
004050 012737 004104 000004 MOV #67$, avERRVEC *=SET UP ERROR VECTOR 
004056 012737 177570 001140 MO\ #DSWR, SWR ;;SETUP FOR A HARDWARE SWICH REGISTER 
004064 012737 177570 001142 MOV #DDISP,DISPLAY ::AND A HARDWARE DISPLAY REGISTER 
004072 022777 177777 175040 CMP #-1,aSWR >: TRY TO REFERENCE HARDWARE SWR 
004100 001012 BNE 69$ : BRANCH IF NO TIMEOUT TRAP OCCURRED 
THE HARDWARE SWR IS NOT = -1 
004102 000403 BR 68$ > :BRANCH IF NO TIMEOUT 
004 104 312716 004112 67$: MOV #68$, (SP) >:SET UP FOR TRAP RETURN 
004112 bier 000176 001140 68$: MOV #SWREG, SWR jsPOINT TO SOFTWARE SWR 
0041 012737 000174 001142 MOV #DISPREG, DISPLAY 
1 : 012637 000004 69$: MOV (SP) +, AMERRVEC ; RESTORE ERROR VECTOR 
004132 005037 001324 CLR $PASS “CLEAR PASS C 
6041 132737 000200 001337 BITB #APTSIZE.SENVM 3 TEST USER SIZE UNDER APT 
004144 001403 BEQ USE NON-APT SWITCH 
004146 012737 001340 001140 MOV ASSWREG, SWR NO. USE APT SWITCH REGISTER 
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OMMON TAGS 


INITIALIZE THE C 


1812 


004154 


004154 


oe 
6 
00417 


Fe 


SSS SeEyyVss 


See SES PEEESERES 


177777 
036432 
004240 
000042 
001336 
001140 


000001 


004306 


004376 


036512 
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000042 


000001 
000176 


001134 


SEQUENCE 
70$: 
.SBITL TYPE PROGRAM NAME 
>: TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
INC s:FIRST TIME? 
BNE is *: H IF NO 
CMP MSENDAD,0#42 ::ACT=11? 
BEQ 71$ F H IF YES 
TYPE ,72$ =TYPE ASCIZ STRING 
.SBTTL GET VALUE FOR SOFTWARE SWITCH REGISTER 
TST a#42 :zARE WE RUNNING UNDER XXDP/ACT? 
BNE 73$ : |BRANCH IF YES 
C SENV, #1 ARE WE RUNNING UNDER APT? 
BEQ 7 > :BRANCH IF YES 
CMP SWR,ASWREG «SOF TWARE SWITCH REG SELECTED? 
BNE 74$ : ;BRANC 
GT SUR va =:GET SOFT=SWR SETTINGS 
738: MOVB #1,$AUTOB ::SET AUTO-MODE INDICATOR 
71$ GET OVER THE ASCIZ 
53728: ASCIZ <CRLF>*CKFPADO FPF FLTG PNT PRT A®<CRLF> 
TYPE 76$ ::TYPE ASCIZ STRING 
75$ 3 OVER THE ASCIZ 
55768: -ASCIZ ‘EOP MSGS WILL PRINT EVERY 4 PASSES (15 SECONDS) !<CRLF> 
TYPE 78$ ;3TYPE ASCIZ STRING 
7$ *GET OVER THE ASCIZ 
55788: -ASCIZ. !HIT ANY KEY TO DISABLE/ENABLE EOP MESSAGES! <CRLF> 
cen CLR EPENDS :CLR THE ENABLE/DISABLE EOP FLAG : DPMO02 


ee eae Ct 


31 


G 3 
CKFPADO FRIIF FLTG ENT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 25 SEQUENCE 32 


TEST #@ 1 = LDFPS, STFPS AND DATA PATHS TEST 


1835 - SBTTL TEST # 1 = LDFPS, STFPS AND DATA PATHS TEST 
“REeeaeeaeeeeezeeeaaeeeeeeeeeeaeaeakaekeaeeaaeaaeaeeaaeeaaeaeeaaneaae aeeaeeaeee 
;*TEST 1 LDFPS, STFPS AND DATA PATHS TEST 
< STHIS IS A TEST OF THE LDFPS <LOAD FLOATING POINT STATUS) AND STFPS 
**(STORE FLOATING POINT STATUS) INSTRUCTIONS. A COUNT PATTERN IS GENERATED 
‘AND RUN THROUGH THE FLOATING POINT STATUS REGISTER. 
:*THIS WILL TEST THE 16-BIT TRI STATE BUS WHICH CONNECTS THE CPU 
oe THE Ring AND ALSO RUNS INTERNALLY WITHIN THE FPP. ONLY DMO AND 
**® 
sO Ser Tray A MASK MUST SE USED BECAUSE SOME OF THE FPS BITS CANNOT 
<u THE FIRST FIVE ERRORS WILL BE REPORTED INDIVIDUALLY 
‘+, 41S IS TO PREVENT LOCKING OUT THE COMPLETION OF THE TEST BECAUSE 
“OF VIRTUALLY ENDLESS NUMBER OF ERRORS. ONLY FIVE INDIVIDUAL ERRORS 
‘WILL BE REPORTED THEN THE TEST WILL BE COMPLETED AND AN ERROR 
; * SUMMARY GIVEN (SEE NOTE BELOW). 
: SNOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE LOGICAL ‘AND’ AND ‘OR‘ 
**OF THE FAILING DATA PATTERNS. THESE CAN BE VERY USEFUL IN DETERMINING 
>*STUCK BITS. IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH (SWR13) 
>*OFF, THEN THE USER WILL RECIEVE EACH INDIVIDUAL ERROR MESSAGE PLUS 
>*AN ERROR SUMMARY AT THE END OF THE fEST. INHIBITING ERROR PRINT OuT 
“WILL INHIBIT FERROR SUMMARY PRINT OUT, EXCEPT IN THE CASE DESCRIBED BELOW. 
-*T0 GET JUST THE ERROR SUMMARY WITH NO INDIVIDUAL ERROR REPORTS, 
:*SET SWITCH REGISTER B1T13 AND SWITCH REGISTER BIT7 BOTH ON. 
y  euecoeecanedcnnnsneressekecesssatndndetbenstsonadecseesconenses 
004456 000004 TST1: SCOPE 
1836 004460 005037 004736 CLR AERFLG 
1837 004464 012737 004526 001110 MOV #A1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1838 004472 012700 177777 MOV #-1_,R : INITIALIZE THE COUNT PATTERN. 
1839 004476 012737 004740 000244 MOV #AERR1 , FPVECT =SET UP FOR UNABLE TO DEC 
1840 004504 012737 004752 000010 MOV #AERR2,10 -FPP INSTRUCTION TRAP TO ai OR 10. 
1841 004512 005002 CLR R2 *R2 1S THE ‘AND’ OF BAD DATA. 
1848 004514 005102 COM R2 
1843 004516 005003 CLR R3 :R3 IS THE "OR* OF BAD DATA. 
1844 004520 012737 005004 000004 MOV #AERR3, ERRVECT “IF EITHER INSTRUCTION 
1845 :FAILS TO GO THROUGH T 
1846 :CORRECT SRC OR DST MODE AN 
184 “ODD ADDRESS TRAP WILL OCCUR. 
1848 004526 Al: 
1849 004526 010004 All: MOV RO.R4 
1850 004530 042704 030020 BIC #30020,R4 
1851 004534 170104 LDFPS  R4 = TEST INSTRUCTION. 
1853 004536 012701 177777 V #-1,R1 
1854 004542 170201 Al2: STFPS RI : TEST INSTRUCTION. 
1855 004544 012737 042534 000244 MOV #FPSPUR,FPVECT *SET UP FOR UNEXPECTED TRAPS. 
1856 004552 010004 MOV RO.R4 “MASK OFF UNSETTABLE BITS. 
1857 004554 042704 030020 BIC #30020 ,R4 
1858 004 560 012737 042566 000004 MOV #CPSPUR,ERRVECT 
1859 566 012737 042604 000010 MOV #CPTWO, 10 
1860 004574 020401 CMP R4,R1 : COMPARE DA DATA EXPECTED WITH 
1862 004576 001002 BNE A3 “IF NOT POUAL GO REPORT ERROR. 


é 
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CKREFPADO FPTIF FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 25-1 SEQUENCE 
TEST #@ 1 = LDFPS, STFPS AND DATA PATHS TEST 


186° , RO,Al /OTHERWISE DECREMENT COUNT PATTERN 
1864 006 0770 A2: S0B ; OTHERWISE DECREE 
186s Boeebe 900498 , .F pena 
1867 004604 005237 004736 A3: INC AERF LG : RECORD ERROR. aad Ps eaealite 
1889 213 0 ; MOV RO.R5 “COMPUTE 'AND' OF FAILING PATTERNS. 
1870 004614 005105 COM RS 
t 0046616 049502 BIC R5.R2 es ~— a 
00000 :SEE IF MORE THA?! 
1873 004620 022737 5 004736 CMP #5, AERFLG eS 
187% aes TRE BLO A0s : OCCURRED - B 
yi “REPORT ERROR. 
' MOV #A1,$TMP2 
ne Mery 
1380 boc Ot 0a87 001244 MOV R4°$TMP5 
1881 002652 104001 AG: ERROR +1 
1888 004654 000751 AOS: BR A2 : CONTINUE TES ms aan 
: F ANY ERR 
ior i ae Fed Gta MES 
ise boe93 033777 ew eto a “SHOULD BE TYPED. 
1889 004674 032777 000200 174236 BIT #SW7,aSWR 
1890 004702 001461 BEQ ADONE 
-TYPE ERROR SUMMARY. 

1892 004704 Ab: , 

MOV R2,$TMP2 
ibe SSMS Sra aus my ty 
1895 004714 012737 004730 001116 MOV #A7, SERRPC 
1896 0047 915939 000002 001114 MOVB #2,$ITEMB 
189 002980 004737 042010 A7: JSR PC ERTYPE 
1898 004734 000444 BR ADONE 
1900 004736 000000 AERFLG:.WORD 0 

“UNABLE TO DECODE FPP INSTRUCTION. TRAPPED TO 244. 
1908 004740 011637 001236 iERRTC MOV (SP). STMP2 =SAVE PC OF TRAP. 
as Sires ake rae ei 
1906 004750 000436 BR ADONE 
- UNAB TION. TRAPPED TO 10. 

1909 004752 021627 004530 iERROS chp (SP) RATIO :DID TRAP OCCUR OF FPP INSTRUCTION? 

BEQ 
iors 904760 031697 004544 CMP (SP) ,#A12+2 
13) PP INSTRUCTION THEN 
ee Oe me = Te A iN 
ba . REPORT IR DECIDE ERROR. 

: (SP) ,STMP2 : OTHERWISE 

ive Sarre unger zs aya 
1918 005 104011 
1919 iets 000421 BR ADONE 


-_— — ee 
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“a FPTIF FLTG PNT PRT A 
7 #1 = LOFPS, STFPS AND DATA PATHS TEST 


004530 
004544 
042546 


001236 


MACRO gilt 20-OCT-81 08:47 PAGE 5. 5 


; TRAP TO 4 HANDLER: 
AERR3: CMP (SP) ,#A11+2 


BEQ 
CMP (SP) ,#Al2+2 
BEQ 
JMP CPSPUR 
1$: MOV (SP) ,STMP2 
CMP (SP)+,(SP)+ 
15$: ERROR +14 
~ ADONE 
2$: MOV (SP) ,STMP2 
CMP (SP)+,(SP)+ 
25$: ERROR +15 
ADONE : 
RSETUP 


SEQUENCE 


D THE TRAP OCCUR ON THE 
FPS INSTRUCTI 
STFPS INSTRUCTION? 


E 
ITHER THEN wl 
ECTED TRAP TO 4 


+ G0 ae THE FPS AND Da AND 
: THE DESIRE TO CHANGE THE SOF 
VIRTUAL CONSOLE SWITCH — (HAS 
:THE USER TYPED CONTROL G?) 


34 


FPADO FPIIF FLTG PNT PRT A 
ST #2 = CFCC TEST 


1946 


SISSSLLILLLLL 

PAP AAAPP AAS 

WONAOUNES Wr -O O@™N 
RS 


3 
88 8888 88 88 sss 


POO 
wr 
Van UVM Wwe UWS OU 


oo 
oo 


oS 


aRoOD MONMNOO GF Ro 


NS NNN NN 
NOUS WM -OO® 
Wwn 


a ed ed ed ed = =o 1 tI I I ot) 0 od et 0 oe 
Coo~™~ 
OOO 


— —s ed eed oe wed eed aed od — —> 2  — — —2 — — 


1982 


Te 


0 7 
012700 
170100 


170000 


013703 
042703 
020003 
001002 


005064 
000017 


177776 
177760 


005066 


001240 
001242 


001240 
001242 


i 3 
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001110 


001236 


SEQUENCE 


-SBTTL TEST # 2 = CFCC TEST 


WR ARAREBSAABSASLASLASLALEAAAASLASLERARESAARARRARAR RRR RRRRARRRSR RRR RAR ASE SS SE @ | 


S*TEST 2 


CFCC TEST 


-* 
z*THIS IS A TEST OF THE COPY CONDITION CODES INSTRUCTION, CFCC. 
-* 


'WeERRAABEAALASLASLALZALASAAARARRASAASARRRARARARARSERR RR RRARR RSA RRS DS ES | 


1ST2: 


B1: 


B2: 


B3: 


BERR: 


SCOPE 
MOV 
MOV 


#B1,$LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
#17,R0 ;RO CONTAINS TO TEST PATTERN. 


RO ;LOAD THE TEST PATTERN 


:COPY CONDITION CODES. 
PSW_R3 ;SEE IF PATTERN TRANSFERED. 
#177760,R3 
RO,R3 
BERR 


RO .B1 
BDONE 


R1 ;WAS FPS MODIFIED BY CFCC? 
#B2,$TMP2 

RO,R1 

BERR1 


R3.$TMP3 
RO, STMP4 
+3 


B3 


RO, STMPS 
R1,$TMP4 
+4 
63 


;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


eee ee ee eee 


$5 


TEST #@ 3 = SETF, SETD, 
1991 
003128 
1936 0051 012737 
199 903186 012737 
1994 005174 Sete ta 
1995 etait 012737 
Hb 005210 005000 
1998 005812 170100 
1999 005214 012737 
2000 
1 005222 170001 
35 
003 005224 170201 
004 005 ¢8 005002 
$006 003932 001402 
3 808 34 004737 
009 005240 
005240 012737 
gig 005246 012700 
at O08 3¢ 170100 
013 005254 012737 
Bie 005262 170001 
18 005264 17060) 
01 Boe $8 012702 
sue 5272 020102 
1 bbe 74 007 496 
a1 05276 00473 
022 005302 
08309 018535 
3 005310 012737 
4 005316 018585 
5 0053524 012700 
: 005330 170100 
Boe 32. 012737 
5340 170011 
1 005342 17960) 
5344 oie 02 
5 38 02 Hs 
535 Oot 
§ 005354 004737 


CKFPADO FPITIF FLTG PNT PRT A 


SET: AND 


005174 
000760 
000202 
043677 


005222 


147757 


005752 


Kk 3 
MACRO M1113 20-OCT-81 08:47 PAGE 27 SEQUENCE 
SETL TEST 
-SBTTL TEST # 3 - SETF, SETD, SETI AND SETL TEST 
fF AAAAAAAAAAAAAAAKAAAAAARARAEAAAAAARHAAARARAAAAAAAAAKARKRARARAKAEAAES 
=*TEST 3 SETF, SETD. SETI AND SETL TEST 
-* 
**THIS IS A TEST OF THE SETF, SETD, SETI AND SETL INSTRUCTIONS. 
**EACH INSTRUCTION IS EXECUTED WITH THE FPS CONTAINING 
**ALL ONES AND ALSO WITH THE FPS CLEAR. THE RESULT OF EACH 
** SITUATION IS CHECKED. 
*% 
*: RERAEAEAEAEAAEAAEAKEAAAARAAAEEAREREAEKAAEREAEAARARARAERARAAARERAEERREEREREEEEEE 
1ST3: SCOPE 
001110 MOV #C1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
001244 MOV #760, $TMP5 
001250 (C1: MOV #202. $TMP7 
001252 MOV #SETF1,$TMP10 
CLR RO 
LDFPS RO =CLEAR THE FPS. 
001236 MOV #C15,$TMP2 
C15: SETF :TEST INSTRUCTION. 
STFPS RI :GET RESULT. 
CLR R2 
CMP R2,R1 :DID AN ERROR OCCUR? 
JSR PC, CERR1 
1$: 
001110 MCV #C2,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
C2: MOV #147757,RO 
LDFPS RO :PUT 147757 IS FPS 
001236 MOV #C25,$TMP2 
C25: SETF :CLEAR FD BIT. 
STFPS RI :GET RESULT 
MOV #147557,R2 
CAP R1,R2 :RESULT CORRECT. 
JSR PC, CERR2 
1$: 
001110 MOV #C3,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
001250 C3: MOV #2035, STMP7 
001252 MOV #SETD1,$TMP10 
MOV #147757,RO 
LDFPS RO :LOAD 147757 INTO FPS. 
001236 MOV #C35,$TMP2 
C35: SETD -SETD FD BIT. 
STFPS RI 
MOV #147757,R2 
CMP R1,R2 *RESULT CORRECT? 
JSR PC, CERR2 





eee ee ee eee —- - 
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CKFPADO FPIIF FLTG PNT PRT A 


TEST #@ 3 = SETF, SETD, 


005 
rf 01 hae 
636 008 0 179100 
78 005372 012737 
¢ 005400 170011 
04 
044 OO 3408 170201 
SS Sani 
Saat: 
3049 005414 004737 
050 003455 
005420 012737 
051 ak 4 012737 
826 005434 012737 
27 005442 005000 
055 005444 170100 
Bae 005446 012737 
058 005454 170002 
2059 
Spey 005456 170201 
061 005460 005002 
062 005462 020201 
063 005464 001402 
ve: 005466 004737 
S066 005472 
Mean 012737 
2067 005500 012700 
Ai OR eae 170100 
5 5506 012737 
3071 005514 170002 
$058 O38 18 170201 
Spee 005520 012702 
75 005524 020102 
o76 5526 OSes 
7? 005530 0047 
7 
005534 
eez 012737 
5542 012737 
1 005550 Seat 
ieee 12700 
55 170100 
: 005564 012737 
005572 170012 
$088 005574 170201 


SET: AND 


005 566 


005400 


000200 


005654 


005426 
000204 
043713 


005454 


005654 
005500 
147757 
005514 


147657 


005752 


005542 


147757 
005572 


3 
MACRO M1113 20-OCT-81 08:47 PAGE 57-1 


SETL TEST 


1$: 
001110 
C4: 


001236 


C45: 


1$: 
001110 
001250 C5: 
001252 


C55: 


1$: 
C6: 


001110 


001236 


C65: 


1§: 
001110 
001250 (C7: 
001252 


C75: 


SEQUENCE 


#4, SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
RO ;CLEAR FPS. 
#045, $TMP2 
:SET FD BIT. 
R1 :GET RESULT. 
#200,R2 
RI Re sRESULT CORRECT? 
PC, CERR1 
#C5.$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
#204,$TMP7 
#SETI1,$TMP10 
RO 
RC s;CLEAR FPS 
#C55,$TMP2 


:CLEAR FL BIT. 
R1 ;GET RESULT. 


R2 
agent sRESULT CORRECT? 
PC, CERR1 
#C6,$LPERR s;SET UP THE LOOP ON ERROR ADDRESS. 
#147757.RO 
RO sPUT 147757 INTO FPS 
#C65,$TMP2 

:CLEAR FL BIT. 
R1 :GET THE RESULT. 
#147657,R2 
R1,R2 sRESULT CORRECT? 
PC, CERR2 
#C7,$LPERR sSET UP THE LOOP ON ERROR ADDRESS. 
#205, $TMP7 
#SETL1,$TMP10 
#147757,RO 
RO sSET FPS TO 147757. 
#C75,$TMP2 

:SET FL BIT. 
R1 :GET THE RESULT. 


ae me ae eee —-— —- 
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CKEPADO FRIIF FLTG PNT PRT A 
TEST # 3 = SETF, SETD, SET: AND SETL T 


00557 


S 
w 
Oo 
iw] 
™m 


Ssss Ssss 


oS 
ooooeco 
VN™N 
aos 
Oo 


=) 
Nm 
= 


wr 
o 


SSeS 
Ne SVG FY Sosy 


Vie Ww Www OFS 


oS 
So 
SaNVOONN ONNWNNN 


Ss Ss 


POR =O OO WAAR UII ODO NOU EW OOD NAMP WH OSS NEAR AUS S 
Ww 
~ 
~ 


MN rororore Nm | 
RUNNION ORONO UNRUNNUNY 


: 


012702 
061408 


000522 
010103 


000503 
022703 


001771 
032703 


147757 


005752 


005620 


005632 


000100 


005654 


177477 
000300 
000300 
000200 
043705 
000205 
000100 


043721 
000205 


177477 


000300 
000300 


000200 


MACRO M 
E 


001110 


001236 


001254 
001246 


1$: 
C8: 


C85: 


1$: 


4 
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SEQUENCE 38 


sRESULT CORRECT? 


THE LOOP ON ERROR ADDRESS. 
sCLEAR FPS. 


sSET UP 


:SET FL BIT. 


;RESULT CORRECT. 


: THESE ARE ERROR ANALYSIS ROUTINES: 
CERR1: V 


1$: 
2$: 


3$: 


CERR2: 


1$: 
2$: 


MOV #147757,R2 
CMP R1_,R2 

BEQ 1$ 

JSR PC, CERR2 
MOV #C8.$LPERR 
CLR 0 

LDFPS RO 

MOV #C85,$TMP2 
SETL 

STFPS RI 

MOV #100,R2 
CMP R1,Re 

BEQ 1 

JSR PC, CERR1 
BR CDONE 

MO R1.R3 

BIT #1774677 ,R3 
BEQ 

BR CERR4 

CMP #300,R3 
BEQ 1$ 

BIT #300,R3 
BEQ 1$ 

BIT #200,R3 
BEQ 

MOV #SETD1,$1MP11 
MOV #203,$TMP6 
BR RR3 

BIT #100,R3 
BEQ 1$ 

MOV #SETL1,$1MP11 
MOV #205, $TMP6 
BR RR3 

MOV R1,R3 

COM R3 

BIT #177477,R3 
BEQ 4 

BR CERR4G 

BIT #300,R3 
BEQ 

BIT #300,R1 
BEQ 1$ 

BIT #200,R1 


;ARE ANY OTHER BITS SET? 


;ARE BOTH FD AND FL SET? 
sARE THEY BOTH CLEAR? 


:IS FD SET? 


:IS FL SET 


;ARE ANY OTHER BITS SET? 


;ARE BOTH FD AND FL SET? 
;ARE THEY BOTH CLEAR? 


:1S FD CLEAR? 


5 

La 
7 

'wv 
-+ 


Sere ®& 
Bees No-- 
A LO 


VlwWwn—-O O@~nac uw 


: 


S555 


PPAR & 


SS SRN 


: 

sig Sot 
es Sis 
16 906106 
2168 110 
19% 006112 
170 

a 006116 
8 pass 
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MACRO M1113 20-OCT-81 08:47 PAGE M73 


PRT A 
SET: AND SETL TE 


OA 5677 001254 
202 001246 
000100 


043713 001254 
000204 001246 


ST 


3$: 


;REPORT 
CERRS: 


1$: 


CERR4: 


1$: 


CPC: 
CDONE : 


BNE 3$ 

MOV #SETF1,$TMP11 
MOV #202, $TMP6 
BR CERR3 

BIT #100,R1 
BNE 1 

MOV #SETI7,$1MP11 
MOV #204 ,$TMP6 
BR CERR3 

THE ERRORS: 

MOV R1,$TMP3 
MOV R2,$TMP4 
MOV (SP) +, CPC 
ERROR +12 

JMP acPc 

MOV R1,$TMP3 
MOV R2,$TMP4 
MOV (SP)+,CPC 
ERROR +13 

JMP acPc 

WORD 0 

RSETUP 


SEQUENCE 


:IS FL CLEAR. 


:GO INITIALIZE THE FPS AND STACK; AND 
; IF THE ESSED 


U 
;THE DESIRE TO CHANGE THE SOFTWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


39 


B 4 
“«SPADO FRITE ELTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 28 SEQUENCE 
TEST @ & = JLLEGAL F®&P OP “ODES AND STST TEST 


2795 -SBTTL TEST # & = ILLEGAL FPP OP CODES AND STST TEST 


“SPSS eeeeekaeaeaeageeaeaeeaeaeakeeeeaeaeeeetetaeeeeee 


[*TEST 4 ILLEGAL FPP OP CODES AND STST TEST 
-* 

*eTHIS 1S A TEST OF THE FPP OPERATION CODES: 

-* 170003 


70003 
7001 
7001 
7001 


see ee ee 
—__ at ont od 
N #£WO 


7007 
3*THESE ARE ILLEGAL INSTRUCTIONS AND (WITH INTERRUPTS ENABLED) 
;*SHOULD CAUSE A TRAP TO ° 
;*ALSO TESTED HERE IS THE INSTRUCTION: 


:* 
z*WHICH SHOULD PUT THE FEC CODE 2 IN R1, AFTER ANY OF THE ABOVE 
:*OP CODES IS EXECUTED. 

-* 


FL AAAAAAAAAAAAAAAAAAAATAREAATARARARAARAARAARAARAAAAEAAAEAAAREEAAAEREE 


90% TST4: SCOPE 


006122 000 
2196 0081 9 012737 006152 001110 MOV #01, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
197 006132 012705 170003 MOV #170003.R5 : INITIAL OP CODE. 
198 006136 012737 006342 000004 MOV #DERR2 ,ERRVECT 
199 006144 012737 006246 000244 MOV #DERR1 .FPVECT 
$5 006152 005000 D1: CLR RO 
0@ 006154 170100 LDFPS RO :CLEAR FPS. 
03 006156 005 é LR R2 
006160 0105 006176 MOV R5,D2 ;SET UP THE ILLEGAL INSTRUCTION. 
05 006 164 010537 001244 MOV R5.$TMPS 
04 006170 012737 006176 001236 MOV #D2,$TMP2 
07 06176 000000 D2: . 0 
08 306200 170000 D3: CFCC 
09 006202 005202 INC R2 
1¢ 006204 005202 D4: INC R2 
6 006206 170201 STFPS bet sREPORT FAILURE. DID NOT TRAP. 
31 006210 010137 001240 MOV R1.$TMP3 
14 006214 104016 1$: ERROR +16 
16 16 022705 170010 DS: CMF #170010.R5 : COMPUTE NEXT OP CODE 
1 2 001003 BNE D6 
18 4 O12 05 170013 MOV #170013,R5 
19 750 BR D1 
1 32 022705 170077 D6: CMP #170077, R5 
; 001001 BNE D7 
40 000452 BR DDONE 
4 42 005205 D?: INC R5 
5 44 000742 BR D1 
$ 063s 20716 006200 DERR1: CMP #03, (SP) =DID TRAP OCCUR ON TEST INSTRUCTION? 
3 54 pots? 042534 JMP FPSPUR 


ML EE Te ee. ae ie —— 


mw ASF F 
ef oof O&O 


~~ 
~O OO VO UILS WW - OO O@ 
Www WH 


$2 geese gas 
OURS NOFr 


Se Sees & 


SHER 
& $e 


3 


ee ee eee 


"KFPADO FRIIF FLTG PNT PR 
TEST #4 = ILLEGAL 


PR 


100000 


1 
00124 


8 
4 MACRO ihe seOrOC <6 08:47 PAGE 58-1 
FPP OP “ODES AND STST T 


0012460 


001240 


1§: 


2$: 


3$: 
D8: 


mp 
STFPS 

MP 
BEO 


tapi caps 
#100000 ,R1 
3$ 


#100000, $THPS 
Noe 

#1,R4 

R4 


#2,R4 
D9 
D5 


#D8,$TMP3 
R4,STMP4 
+20 
D5 
#DB+2, (SP) 
D10 
CPSPUR 


(SP) ,STMP2 
(SP)+,(SP)+ 
+21 


D5 


em ne ae ea -_- == 


SEQUENCE 4/1 


:GET THE FFS AND SEE IF IT IS 
:SET CORRECTLY. 


70 ae FEC CODE. NOTE _ 
D 
sWAS FEC CORRECT? 


;REPORT STST FAILURE 


2D 
S 


ie THE TRAP OCCUR ON THE 


T INSTRUCTION? 


:GO INITIALIZE THE FPS AND STACK; 
:SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


AND 


2275 


tt et et es = 
ONO who 





Test #5 = FIC, 


SERRE FES 


FF 3 
FSR ROVE 


PERE FESS FEF F 


SN SARNOFF SSN Sanee FOFSS SESS 


Vw WWM Fw 


Se Ssesse Sea § 


dew 
Sic 
© 
— 
™N xs 
Ww 
~™N 


“KEPADO FRTIF ELTG PNT PRT A 
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INTERRUPT SISABLE, BIT TEST 


006406 
006502 


040000 
006422 


001110 
000244 


001236 


001242 


. SBTTL 


SEQUENCE 


INTERRUPT DISABLE, BIT TEST 


ss eeaeaenenenaararaneneeeeregereaaraaggeraganeaaeenanaenanengeaneane 


:TEST 5 


FID, 


INTERRUPT DISABLE, BIT TEST 


:eTHIS IS A TEST OF FPS BIT 14 (FID) OR FLOATING INTERRUPT DISABLE 


*AN ILLEGAL INSTRUCTION IS EXECUTED WITH FID= 
; #OCCUR. 


celieinnaindsinitdtdpinedaaitaitien steels inant ieee inenanene 


:SET UP 


EERRO: 


1$: 


EERR1: 


1$: 


EERR2: 


1$: 


2$: 


EDONE : 


SCOPE 
MOV 
MOV 


#E1,$LPERR 
#EERR2 , FPVECT 


#40000,R0 
#E3,STMP2 
170020 


R1 
#140000,R1 
RRO 


R1,$TMP3 
#140000, STMP4 
+22 

EDONE 

RS. STMP3 
R4,STMPG 

+23 

EDONE 

(SP) WES 

1$ 

FPSPUR 
(SP), STMP2 
(SP)+,(SP)+ 


R1 
R1,$TMP3 
+24 


1, NO INTERRUPT SHOULD 


THE LOOP ON ERROR ADDRESS. 
:SETUP FOR THE INTERRUPT. 
sSET FID. 

; ILLEGAL FPP INSTRUCTION. 


;SEE IF ERROR WAS DETECTED. 


sSEE IF FEC=2 


sREPORT FPS INCORRECTLY SET. 


REPORT FEC NOT 2. 


:DID THE ILLEGAL INSTRUCTION TRAP? 


:GO ei ee THE FPS AND STACK; AND 
7SEE IF THE USER HAS ee at 

; THE DESIRE TO CHANGE THE SOFTWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 


42 


* 
CKFRPADO FRTIF FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 59-1 
TEST @ 5 = FID, INTERRUPT SISABLE, BIT TEST 


3826 


;THE USER TYPED CONTROL G?). 


SEQUENCE 


43 


CKREPADO FRITE FLIG PNT PRT A 


TEST # 6 = L.DD AND STD, wl” SRC AND 


23353 


rs 


mr 
LAG 


See 


SS55 = 


RAR R A RA AA CY 
SS $8558 
SN SSSSEe 


POPIMINNIPOMNMIPSMNPININMONM 
WIAA NU 


MAAWVMIVMANAAAI 


FSSSESR INS 
S55 


Uw — 
N—— 
Nm OO 


PUPSPONMOAaMaNNsNNsP NNN NononsfeNngns 


af TE FEE 


000004 


005205 
020027 
ee 


str 
00013? 


012701 


010362 
007202 
000002 
007300 
010352 


010416 
000010 


007144 


000200 


MACRO M1113 ss fig 5 de 08:47 PAGE 0 * 
DST MODE 1, TEST 


000004 


A ee ee 


SEQUENCE 


-SBTTL TEST # 6 - LDD AND STD, WITH SRC AND DST MODE 1, TEST 


ff AAA AAA AS AAAARAAAAAAAAKAHA HA AAAKARAKAKARARARKARARAL AKeEReeeRAReAee 


gevee! 6 LDD AND STD, WITH SRC AND DST MODE *, TEST 
:*THIS IS A TEST OF BOTH THE INSTRUCTION: 
LDD (RO) ,ACO 


: AND THE INSTRUCTION: om . A 
: sMOST OF THE FAILURES ARE ISOLATED TO THE SRC OR DST FLOWS. 


NOTE 
7*THAT THE INTEGRITY OF ACO HAS NOT BEEN ASSURED. THA 


THIS MEANS T 
**IN SOME CASES IT WILL BE IMPOSSIBLE TO ATS CERTAIN DATA PATTERN 
; *FAILURES TO EITHER THE FLOWS OR THIS ACCUMULATOR. 
 Gbkeetheindnnaneetnuneeysenkeetenerereeubewensaceseunnecenceeee 
S16: SCOPE 
Fl: 
MOV #F1,S$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #F3,$TMP2 
CLR RO 
LDFPS RO 
SETD 
MOV #FDATIO,R1 ;SET UP THE LOAD DATA. 
MOV #FXDATO,R2 
MOV #10,R3 
Fe: MOV (R2)+,(R1)+ 
SOB R3,F2 
MOV #FDATI4,RO :SETUP RO FOR THE LDD (RO),ACO. 
MOV #FERR20ERRVECT :1F THE SRC FLOWS FAIL THEN 
3AN ODD ADDRESS MAY CCCUR. 
CLR R3 
Fa LDD (RO), ACO 
F4 INC R3 
INC R3 
ie RO ,AFDATI4S sWAS RO AFFECTED? 
JMP FERR1 
F5 CMF R3,42 ;SEE IF THE PC WAS ADVERSELY 
BEG 1$ sAFFECTED DURING THE INSTRUCTION. 
JMP FERR2 
1$ MOV #FDATIO,R1 sMAKE SURE THE SOURCE DATA WAS 
MOV #FXDATO,R2 “NOT AFFECTED. 
MOV #10 
2$: CMP (R13+,(R2)+ 
BEQ 
JMP FERRO 
3$ SOB R3,2$ 
STFPS R1 sMAKE SURE THE F®S IS CORRECT. 
CMP #200,R1 
BEQ F6 


«4 


A , TT - 


2376 006704 
? 710 
8 006716 


10 Boose 
007026 


410 007032 
At 


007042 


S88 $38 88 


Mew 
== 
SF 


007072 
4 


weer eer ec ee herr 


Mororonononsfronhnon 


000137 


wn_~ 
MU 


$783 
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7 


22 
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™Nm 
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CKFPADO FRIIF FLTG PNT PRT A 
TEST # 6 = LDD AND STD. wil” SRC AND DST MODE 1 


010016 
006716 
006760 
Mit 
sau 


010404 
010204 


010404 
007340 
000002 
007332 


010374 
010416 


007436 
007436 
007436 
007436 
007762 


007472 


MACRO M1173 fs 08:47 PAGE 0-7 


000004 


F7: 


es ee | 
~~ = 
—o 
ee @e 


Fl2: 


F135: 


F135: 


F14: 


F15: 


F16: 


F17: 


F20: 


JMP 


FERR11 
#1$. SLPERR 
#F10,$TMP2 
#~1 R3 
#10.R 
orDATOO, RS 
RS. (R5)+ 


#F DATOS ,RO 
SFERROS. ERRVECT 


R3 

ACO, (RO) 
R3 

R3 

RC. MFDATO4 
F12 

FERR3 


#FDATOO,R1 
#FXDATO,R2 


(R1)+,(R2)+ 
F13 

FERRS 
(R1)+,(R2)+ 
F14 

FERRS 
(R1)4+,(R2)+ 
F15 

FERRS 
(R1)+,(R2)+ 
F16 

FERRS 

ay? ets 
FERR10 
(R1)+,(R2)+ 
F 20 

FERR6 
(R1)+,(R2)+¢ 


SEQUENCE 45 


:SET UP THE LOOP ON ERROR ADDRESS. 


;SET UP THE OUTPUT DATA BUFFER. 


;SET UP RO FOR DST MODE 1 REG O. 
:1F THE DST FLOWS FAIL AN ODD 
:ADDRESS COULD OCCUR. 


sTEST INSTRUCTION. 


sWAS RO MODIFIED? 


;WAS THE PC AFFECTED CORRECTLY? 


sSEE IF THE DATA WAS OUTPUT 
;TO THE TARGET AREA CORRECTLY. 


H 4 
CKRFPADO FPIIF FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 30-2 SEQUENCE 46 
TEST # 6 = LDD AND STD, WI”H SRC AND DST MODE 1, TEST 


431 007104 001402 BEO F21 

4 : 007106 000137 007026 JMP FERR7 

434 007112 022122 F21: CMP (R1)+, (R2)+ 

435 007114 140¢ BEOQ F 

‘ 007116 000137 007762 JMP FERR10 

438 007122 005001 F22: CLR R1 

439 007124 179201 STFPS RI *MAKE SURE FPS IS CORRECT. 
440 0071 : 022701 000200 CMP #200.R1 

441 007132 00140 BEQ F23 

42 007134 000137 010016 JMP FERR11 

44 007140 000137 010436 F23:  JMP F DONE 

445 007144 FERRO: :SOURCE DATA AFFECTED BY 

007144 012737 010416 001240 MOV #FEXDATO,$TMP3 ‘THE LDD INSTRUCTION. 
447 007152 012737 010430 001242 MOV #FXDATO+12,$1MP4 
8 007160 012737 010352 001244 MOV #FDATIO, $TMP5 
007166 012737 010364 001246 MOV #FDATI0+12,$1MP6 

450 007174 104025 1$: ERROR +25 

451 007176 900137 010436 jMP F DONE 

453 007202 012737 010362 001242 FERRI: MOV #FDATI4.STMP4 sFSRC FLOWS FAILURE. 
2454 007210 010037 001240 MOV RO. $TMPS 
2455 007214 012737 000762 001244 MOV #762, $TMP5 
2456 007222 012737 000321 001250 MOV #321,$TMP7 
2458 007230 022700 010352 CMP #FDATIO,RO :FSRC MODE 4? 

2459 007254 001004 BNE 1 
2460 007236 012737 000324 001246 MOV #324, STMP6 
2461 007244 000412 BR 4$ 
$208 007246 022700 010372 1$: CMP #FDATI4+10,RO :FSRC MODE 2? 

2464 007252 001004 BNE 
2465 007254 012737 000322 001246 MOV #322, $TMP6 
2466 007262 000403 BR 4$ 
246 
2468 007264 2$: 
2469 007264 104027 3$: ERROR +27 
470 007266 000137 010436 JMP F DONE 
2472 007272 4$: 
2473 007272 104026 5$: ERFOR +26 
57 007274 000137 010436 JMP F DONE 

476 007300 012701 006616 FERR2: MOV #F4,R1 : THE PC WAS INCORRECTLY AFFECTED 
247 “DURING THE INSTRUCTION. 
478 007304 010137 001242 FER2: MOV R1,$TMP4 

479 007310 162701 000004 SUB #4°R1 

4 007 006303 ASL R3 

481 007316 060301 ADD R3,R1 
e482 007 0 010137 001240 MOV R1.$TMP3 

4 7324 104030 1$: ERROR +30 
58s 007326 000137 010436 JMP F DONE 

4 7332 012701 006762 FERR4: MOV #F11,R1 

siBo Neer 000762 BR FER2 


Cure 
TES! 
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FLTG PNT PRT A 
AND STD, wl" SRC AND DST MOD 


010374 
000644 


010414 
000642 


010436 


010406 
000003 


007762 


001240 
000207 


MACRO M1113 


001242 


001244 
001250 


001246 


001246 


001242 
001244 
001246 


001244 
001246 
001250 


001244 


FERR3: 


FERR6: 


2$: 


5$: 
6$: 


7$: 


20 
E 1 


. TE 


4 
Sd 08:47 PAGE 40-3 


#FDATOS,STMP4 
RO. STMPS 
#527, $TMPS 
#641,$TMP7 

#F DATOO,RO 


#644 ,STMP6 
4$ 


#FDATO4+10,R0 
#642, STMP6 
4$ 


+32 
F DONE 


+31 
F DONE 


RO,STMP3 
#FDATOO,STMP4 
#FDATO7,STMPS 
#FXDATO,STMP6 
+33 

F DONE 
#FDATOS.R1 
#-1,R2 

#3,R3 
Gola 
R3,1$ 


+3 


F DONE 
#FDATOS,R1 
#3,R3 
(Ri)+ 

7$ 
FERR10 
R3,6$ 


RO, $TMP3 
#207, $TMP5 


ee ee we eee wee ee 


SEQUENCE 


sFAILURE IN THE FOST FLOWS. 
;DST MODE 4? 


;DST MODE 2? 


sFAILURE OF STD. 


:DID (BUT GR7) FAIL IN THE FDST 
FLOWS? 


REPORT FAILURE OF (BUT GR7) IN 
; THE FDST FLOWS. 


;DID (BUT GR7) FAIL IN THE SRC FLOWS? 


sREPORT FAILURE OF (BUT GR7) IN 
; THE FSRC FLOWS. 


4” 


545 007604 
546 007612 


$y 
Oo 
Se 
xe 
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VIAAAWY 

eas 
sees 
Sotto 
See 
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SSSeN 
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PADO FPIIF FLTG PNT PRT A 
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060176 
000174 


010436 


010610 
177777 
000002 


010436 
010410 
000002 


007762 


001240 
000441 
000076 
000077 


010436 


001240 
000200 


010436 


MACRO M1113 20-0 
STD, WI"H SRC AND DST MODE 1, T 


001246 
001250 


001244 
001246 
001250 


001244 
001246 
001250 


001242 
001244 
001246 


10$: 


FERR7: 


1$: 


2$: 


5$: 
6$: 


7$: 


10$: 


FERR10: 


1$: 


FERR11: 


1$: 


FERR20: 


MOV 
MOV 


P 
(1-81 08:47 PAGE 30-4 
EST 


#176, STMP6 
#174, S1MP7 


+35 
F DONE 


#FDATO6,R1 
#-1,Re 


#2,.R3 
R2.(R1)+ 
5$ 

R3,1$ 

RO. STMP3 
#707, $TMP5 
#244,$TMP6 
#245, $TMP7 
+36 

F DONE 
#FDATO6,R1 
#2,R3 
(R1)+ 

7$ 
FERR10 
R3,6$ 
RO, STMP3 
#441, $TMP5 
#76, $TMP6 

#77 ,.$TMP7 

+37 

F DONE 

RO, S$TMP3 

#F DATOS, STMP4 
#FDATO7,$TMP5 


#FXDAT4 ,STMP6 
+40 


F DONE 
R1,$TMP3 
#200, $TMP4 
+4] 

F DONE 

#NULL ,$TMP15 
$TMP10 

(SP) ,$TMP2 
#FDATI4, STMP3 
#321, $TMP7 
#762, $TMP5 


SEQUENCE 


sDID (BUT FD) FAIL IN THE FDST FLOWS? 


sREPORT FAILURE OF (BUT FD) IN THE 
;FDST FLOWS. 


:DID (BUT FD) FAIL IN THE FSRC FLOWS? 


sREPORT FAILURE OF (BUT FD) IN THE 


sFSRC FLOWS. 


;REPORT DATA ERROR. 


sREPORT BAD FPS. 


;THE EXECUTION OF THE LD 
;CAUSED A TRAP TO 4, BEC 
sA FSRC FLOW FAILURE RES 
;IN AN ODD ADDRESS. 


D 
AUSE 
ULTED 
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000325 


010364 
042566 
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MACRO M1113 
TEST #6 = LDD AND STD, WI”H SRC AND DST MOD 


001246 


001246 


001264 
001246 
001252 


001264 


001240 


001244 
001250 


001246 


001246 


1$: 


2$: 


3$: 


4$: 


FERR21: 


1$: 


FERR25: 


3$: 


4$: 


CMP 
BEQ 


CMP 
BNE 
MOV 

MP 
ERROR 
BR 


kK 4 
20-OCT-81 08:47 PAGE 30-5 
— 1, TEST 


(SP) ,#F4+2 
FER 


R21 
RO. #FDATI3 
2$ 


#325 ,STMP6 
(SP)+, (SP)+ 
+42 

F DONE 

RO, AFDATIS 
3$ 

CPSPUR 
#323,STMP6 
(SP)+,(SP)+ 
+42 

F DONE 

(SP)+, (SP)+ 
#MS16,$TMP15 
#326, STMP6 
#327,$TMP10 
+42 

F DONE 

#NULL ,STMP15 
STMP 
#FDATO4 ,STMPS 
(SP) ,STMP2 
#527,$T 
#641,$TMP7 
(SP) .#F10+2 
FE 


RR26 


RO, AFDATOS 
c$ 


#645, STMP6 
(SP)+,(SP)+ 
+43 


F DONE 
RO, AF DATOS 
3$ 

CPSPUR 
#643, $TMP6 
_* 


+ 


SEE IF 
s EXECUTED 


iFSRC MODE 5? 


sFSRC MODE 3? 


sREPORT FSRC 
sMODE 3. 


FSRC MODE 6 OR 7 WAS 


sREPORT FSRC FLOW FAILURE TO 
;MODE 5. 


FLOW FAILURE TO 


sREPORT FSRC aL OY FAILURE TO 


sMODE 6 OR MODE 


SEQUENCE 


;THE EXECUTION OF THE STD INSTRUCTION 


; TRAPPED TO 4, 


BECAUSE A_FAILURE 


7IN THE FDST FLOWS RESULTED 
: IN AN ODD ADDRESS. 


;FLOW FAILURE TO FDST MODE 6 OR 7? 


:DID FDST FLOW FAIL TO MODE 5? 


;REPORT FLOW FAILURE TO FDST 
;MODE 5. 


:DID FDST FLOW FAIL TO MODE 3? 


REPORT FDST FLOW FAILED TO MODE 3. 
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CKFPADO FPIIF FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE b0-¢ SEQUENCE 50 
TEST # 6 = LDD AND STD, WI" SRC AND DST MODE 1, TEST 






$59 010320 000446 BR F DONE 
661 01 FERR26 :REPORT FDST FLOW FAILURE TO MODE 
1 01 73? 044503 0012 #4S16,$TMP15 76 OR MODE 7. 
1 01 000646 001246 MOV #646, $TMP6 
664 01 012737 000647 001252 MOV #647.$TMP10 
665 010344 02262 CMP (SP)+, (SP)+ 
666 010 10406 1$: ERROR +43 
667 010350 009432 BR F DONE 
669 010 $2 177777 FDATIO: -1 
670 010354 177777 FDATI1: -1 
671 010356 177777 FDATI2: -1 
672 010 177777 FDATI3: 1 
7 010 177777 FDATIG: -1 
674 01 177777 FDATIS: -1 
675 010 177777 FDATI6: -1 
676 010 0 177777 FDATI7: <1 
677 010372 177777 o} 
678 010374 177777 FDATOO: =-1 
679 010376 177777 FDATO1: -1 
2 010400 177777 FDATO2: -1 
1010402 177777 FDATO3: =-1 
é 010404 177777 FDATO4: -1 
010406 177777 FDATOS: -1 
684 010410 177777 FDATO6: -1 
é § 010412 177777 FDATO?: <1 
686 010414 177777 1 
687 010616 177777 FXDATO: -1 
re 010420 177777 FXDAT1: -1 
010422 177777 FXDAT2: -1 
690 0104 4 177777 FXDAT3: <7 
691 010426 052525 FXDAT4: 052525 
69¢ 0104 0 031463 FXDATS: 031463 
693 010432 607417 FXDAT6: 007417 
694 010434 000477 FXDAT7: 000477 
3 
697 010436 F DONE : 
010436 104413 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 


0 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
sone ; THE USER TYPED CONTROL G?). 


CKREPADO FPITF FLTG PNT 


TES? #@ 7 = FSRC MODE 


2705 
010440 
$708 010442 
| A, 010450 
7 010450 
| 710 01045 
711 01 56 
re 01046 
371 01 66 
714 010470 
| $716 010472 
| 4 010476 
19 010500 
? 6 010504 
7 ; o18808 
723 01051 
724 (0105 
725 010526 
76 010534 
727 0105 
? : 01054 
730 010542 
, 1 010546 
7 § 010550 
734 010554 
27 5 010560 
736 010564 
? 010566 
136 010570 
740 010574 
re dtietas 
744 010604 
745 010610 
746 010614 
74 : g 
748 01 
780 91 
rt oi 
neo 
754 010640 
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010450 001110 


011274 


é 
177777 
011132 


011152 


000004 
001236 
001240 


-SBTTL TEST # 7 = FSRC MODE 0 TEST 


"RES EREATECAEReeREeeeeeaaakgeaeagake keke keekeeeettaeeeaeeeaetaeeeene 


-*TEST 7 


-* 
:*THIS IS A TEST OF FSRC MODE ZERO USING THE LDD AND LDF 'NSTRUCTIONS. 
-* 


l2: 


ha he 
Ww 


16: 


I7: 


SCOPE 
MOV 


FSRC MODE O TEST 


#11, $LPERR 


#IDATIO,RO 
#IPAT10,R1 


#4 R2 
(R1)+, (RO)+ 
R2, 2 
#IDATIO,RO 
(RO) ACI 
#IPAT20.RO 
(RO) ,ACO 

#1,R1 
#1ERRO,ERRVECT 
#13, $TMP 

#MS35 ,STMP3 
AC1,ACO 


ra 


#IDATOO,RO 
ACO, (RO) 


#IDATOO,RO 
#IDATIO,R1 


#4 R2 
(RO)+,(R1)+ 
1105 
#IDATO2,R0 
#2,R2 


R 
(RO) + 
110 


sates Ae 
#-1,(RO)+ 
2 


:SET UP THE LOOP ON ERROR ADDRESS. 


sSET FD. 


;SET UP THE INPUT DATA BUFFER. 


;LOAD AC1 


;LOAD ACO 


:IN CASE THE FSRC FLOWS FAIL 


SEQUENCE 


;AN ODD ADDRESS TRAP TO 4 MAY OCCUR. 


;TEST INSTRUCTION. 


;GET ACO, THE RESULTS. 
;SEE IF DATA IS CORRECT. 


;SEE IF (BUT FD) FAILED. 


51 


CKFPADO FPIIF FLTG PNT PART 
TEST #@ 7 = FSRC MODE 
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000004 
011224 


011270 


177777 
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011274 


011132 
011276 


011200 


N 4 
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001110 


001236 
001240 


011254 


011256 


SEQUENCE 


zNOW TEST THE LOAD INSTRUCTION WITH FSRC MODE ZERO AND FD CLEAR. 


]11: 
I12: 


113: 


bo ne 
— —) — 
owns 
so . . 


117: 


120: 


123: 


BR 


#112,$LPERR 
#IPAT10,R0 
#IDATIO,R1 


#4 R2 
(RO)+, (R1)+ 
R2,113 


Seat 130 
(RO), 


#IPAT20,RO 
(RO) ,ACO 


#1,R1 
#114, $1TMP2 
4MS 36, $TMPS 


AC1,ACO 


STRAT SD AO 
ACO, (RO) 


Y 
(RO) +, (R1)+ 
123 

IDATO2, IPATi2 
122 

1ERR1 

IDATO3, IPAT13 
121 

IERR4 


R2,120 
I DONE 


:SET UP THE LOOP ON ERROF ADDRESS. 


;SET UP ACI 


3SET UP ACO 


;CLEAR FD. 
;TEST INSTRUCTION. 


sSEE IF FPS IS STILL CLEAR. 


sRESET TO .DOUBLE MODE. 


:GET ACO 


;SEE IF ACO WAS CORRECT. 


;DID (BUT FD) FAIL? 


;NO ERRORS. 


;I1F AN ODD ADDRESS TRAP OCCURS COME HERE TO ANALYZE THE FSRC FAILURE. 


ee ne ee 
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CRFPADO FRTIF FLIG ENT PR” A 
TEST #@ 7 = FSRC MODE O TES” 
rs Snese Gaarag cvs 
18 011 2716 910540 
B14 017 1610 
B15 011 2716 010730 
316 O11 g 140 
$17 91107 i, 010732 
Hf 831108 M3 042566 
Se a 
38 git116 019737 $0030 
325 011196 195069 
39 111 000467 
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001242 
001244 


[ERRO: 


IPAT13: 


IPAT20: 
]PAT21: 


IPAT 


IDATOOQ: 
IDATO}: 


cmp #14.(SP) 
BEQ 1$ 
CMP #15,(SP) 
BEQ 
CMP #115, (SP) 
BEQ 
CMP #116, (SP) 
BEQ 1$ 
JMP CPSPUR 
MOV (SP) ,STMP2 
MOV ro 
MOV #320, STMP4 
CMP (SP)+,(SP)+ 
ERROR +47 
3R IDONE 
DATA ERROR. 
MOV #IDATIO, STMP4 
MOV #IDATOO,STMPS 
ERROR +517 
BR I DONE 
FAILURE OF (BUT FD) 
Vv #153. $TMP5S 
Vv #434 ,STMP6 
Vv #435 ,STMP7 
ERROR +50 
ge DONE 
MOV #153. STMPS 
MOV #435 ,STMP6 
MOV #434 S$TMP7 
BR LERR25 
INCORRECT FPS AFTER LOAD 
MOV #114, STMP2 
MOV RO. STMP3 
MOV #4, STMP4 
ERROR + j 
DONE 
0 
170360 
016161 
052525 
-1 
-1 
-1 
-1 
0 
0 


MAKE SURE THE TRAP 
:ON THE INSTRUCTION 


sREPORT FAILURE. 


INSTRUCTION. 


Cap PADO FRTIF FLTG PNT PRT A 
- FSRC MODE O TES” 


TES’ #@ 7? 


1127% 90000C 


11276 00000C 
71 011 
735 O11 
74 O11 
876 011310 


011510 124413 


5883 
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IDATO2: 
IDATOS: 


PpAT IO: 


IDATI 
I DONE : 


oooo Ooo 


SEQUENCE 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS eT ut 
:THE DESIRE TO C Ee F 


; 0 HE SOF TWARE 
;VIRTUAL CONSOLE SWITCH — (HAS 
;THE USER TYPED CONTROL G?) 
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“KFPADO FRTIF FLTG ENT PRT A MACRO 1113 20-OCT-81 08:47 PAGE Bo SEQUENCE 


TEST # 10 = FOST MODE C TEST 


2884 _SBTTL TEST # 10 = FDST MODE 0 TEST 
SF eeeeekeaeeaeaeegereeesesegtaeeaeaeregeeaenaaeeaaanaentaeaenesarananes 
**TEST 10 FOST MODE O TEST 
-*THIS IS A TEST OF THE STORE INSTRUCTIONS, STD AND STF, WITH FDST MODE O. 
-* 
Ue II ett iiiiiiiitiiiiiiiisiiiiiiiiiiiiiiii iis 
011312 000004 1ST10: SCOPE 
2885 011314 1: 
011314 012737 011322 001110 MOV #1$,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
011322 170011 1$: SETD :SET FD 
011324 01 00 012066 MOV #TPAT10.RO 
011 12701 012116 MOV #TPATIO.RI1 
011 012702 000004 MOV #4.R2 
011340 012021 12: MOV (RO) +, (R1)+ :SET UP THE INPUT DATA BUFFER. 
91 011342 077202 SOB R2,T2 
289 011344 012700 012116 MOV #TDATIO,RO :LOAD ACO 
2894 011350 172610 LDD (RO) ,ACO 
4 4 011352 012700 012076 MOV #TPAT20,RO sLOAD AC1 
897 011356 172510 LDD (RO), ACT 
B08 011 012701 0001 MOV #1.R1 :1F THE (BUT FDST) FORK FAILS 
011 012737 011674 000004 MOV #TERRO-ERRVECT *AN ODD ADDRESS TRAP COULD RESULT. 
290! 011372 010737 11406 001236 MOV #13. STMP2 
2 011400 012737 045163 001240 MOV #Ms35 .STMP3 
011406 174001 T3: STD ACcO,AC1 
011410 900240 Té: NOP 
5 011412 000240 TS: NOP 
011414 012700 012106 MOV #TDATOO,RO 
2908 011420 174110 STD AC1, (RO) :GET THE DATA. 
910 011422 012703 012106 MOV #TDATOO,R3 :SEE IF THE DATA IS CORRECT. 
11011426 012706 012116 MOV #TDATIO,RG 
12 011432 012705 000004 MOV #4 RS 
13 011436 022324 T6: CMP (R3)+,(R4)* 
16 011440 001413 BEQ 7105 
16 011442 012703 012112 MOV #TDATO2,R3 :DID (BUT FD) FAIL? 
1 011446 012705 000 MOV #2,R5 
18 011452 005723 17: TST (R3)¢ 
19 011454 001402 BEQ 110 
20 011456 00013 011756 JMP TERR 
1 011462 077505 T10: $08 R5,17 
é 011464 000137 011776 MP TERR2 
‘ 011470 077516 1105: SOB RS5,16 
g :NOW TEST THE STF ACO.AC1 INSTRUCTION. 
8 Or 147e T11: 
011472 012737 011500 001110 MOV #712, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
3380 011500 012700 012066 112: MOV #TPAT10,RO :SET UP THE INPUT DATA BUFFER. 
1 011504 012701 012116 MOV #TDATIO,R1 


—s~ 


a 
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“KS PADO FPIIF FLTG PNT _PRT-A MACRO M1113 20-OCT-81 08:47 PAGE 32-1 SEQUENCE 56 
TEST # 10 = FDST MODE C TEST 


Q 011510 012702 060004 MOV #6 _R2 
9 011316 012021 113: MOV (RO)+. (R1)¢ 
é 11516 077202 $08 118 
011520 012700 912116 MOV #TDATIO,RO :SET UP ACO 
011524 1724616 LDD (RO) ACO 
011526 012700 012076 MOV #TPAT20,R0 :SET UP ACI 
9460 011532 172510 LDD (RO) ACI 
‘ 011534 012701 900001 MOV #1.R1 
011340 012737 011556 001236 MOV #T14,$TMP2 
4 011546 012737 045170 001240 MOV 4MS36,STMP3 
5 011554 170001 SETF SCLEAR FD 
011556 174001 114 STF ACO,AC1 
011560 000240 715 NOP 
§ 011562 000240 116 NOP 
50 011564 005000 CLR RO 
51 011566 170200 STFPS RO :SEE IF FPS IS CLEAR. 
3 011570 022700 000010 CMP #10,R0 
011574 001401 BEQ 117 
34 011576 BR TERR3 
56 011600 117: 
2957 011600 170011 SETD :SET FD. 
2959 011602 012700 012106 MOV #TDATOO,RO 
2960 011606 174110 STD AC1, (RO) :PICK UP AC1. 
2962 011610 012737 177777 012122 MOV #-1,TDATI 
2963 011616 012737 177777 012124 MOV #-1,TDATI 
011624 012703 012106 MOV #TDATOO,R3 
5 011630 012704 012116 MOV ATDATIO,RS 
0116 012705 000004 MOV #4 RS 
011640 022324 120: CMP (R3)+, (R4)+ :WAS THE DATA TRANSFERRED CORRECTLY? 
g 011642 001412 BEQ 123 
0 011644 023737 012112 012072 CMP TDATO2, TPAT12 :DID (BUT FD) FAIL. 
71 011652 001401 BEQ T22 
ks 011654 440 T21: BR TERRI 
73 011656 023737 012114 012074 122: CMP TDATO3, TPAT13 
74 011664 001373 BNE 121 
73 011666 000456 BR TERR 
$ 011670 077515 123: SOB R5,120 
8 011672 000515 BR TDONE 
1 : TRAP HERE THROUGH VECTOR 4 IF AN ODD ADDRESS OCCURS. 
011674 022716 011410 TERRO: CMP #14, (SP) *MAKE SURE THE TRAP WAS ON 
11 00 1413 BEQ 1$ “AN INSTRUCTION BEING TESTED. 
1170 2716 011412 CMP #75, (SP) 
§ 011706 001410 BEQ 
11710 022716 011560 CMP #715, (SP) 
11714 001405 BEQ 
11716 022716 011562 CMP #716, (SP) 


. Ss 
CKFPADO FPIIF FLTG ENT PR” A MACRO M1113 20-OCT-81 08:47 PAGE 32-2 SEQUENCE §7 
TEST # 10 = FOST MODE C TEST 


9 011722 901492 BE 1$ 
; 011726 000137 042566 JMP CPSPUR 
4 oD 011637 001236 1$: MOV (SP) ,STMP2 
117 be : 6 CMP (SP)+,(SP)+ 
0117 12737 000527 001240 MOV #527, $TMP3 
911744 012737 000660 001242 MOV #640, STMP4 
011752 106121 23: ERROR +121 
011754 009466 BR TDONE 
sREPORT DATA FAILURE. 
011756 TERR: 
1 011756 012737 012116 001242 MOV #TDATIO, STMP4 
¢ a oes 012737 012106 001244 MOV #TDATOO,STMPS 
117 2 106128 1$: ERROR +123 
é 11774 000654 BR TDONE 
-REPORT FAILURE OF (BUT FD). 
011776 012737 000160 001246 TERR2: MOV #160, $TMP6 
012004 012737 900161 001250 MOV #161,$TMP7 
4 012 012737 000640 001244 TERR2S: MOV #640. $TMP5 
10 01 02 104122 1$: ERROR +122 
11012022 000441 BR TDONE 
| 12 01 O24 012737 000161 001246 TERR4: MOV #161, STMP6 
2013 012032 012737 000160 001250 MOV #160, $TMP7 
3 012060 000764 BR TERR2D5 
16 sREPORT INCORRECT FPS AFTER STORE INSTRUCTION. 
3017 012042 TERRS: 
18 012042 012737 011560 001236 MOV #115, $TMP2 
19 012050 010037 001240 MOV RO, STMP3 
20 012054 012737 000010 001242 MOV #10, $TMP4 
30 1 012062 104041 1$: ERROR +41 
; 012064 000420 BR TDONE 
$094 012066 090000 TPAT10: 0 
3§ 012070 170360 TPAT11: 170360 
: 012072 016161 TPAT12: 016161 
12074 052525 TPAT13: 052525 
012076 177777 TPAT20: =1 
012100 177777 TPAT21: -1 
31 01 102 177777 TPAT22: -1 
: 012106 177777 TPAT23: 1 
012106 000000 TDATOO: 0 
5 012110 000000 TDATOI: 0 
O1et1e 000000 TDATO2: 0 
012114 000000 TDATO3: 0 
9 012116 000000 TDATIO: 0 
0 012120 000000 TDATI1: 0 
1 012122 000000 TDATI2: 0 
é 12124 000000 TDATI3: 0 
4 012126 TDONE : 
012126 104413 RSETUP :GO INITIALIZE THE FPS AND STACK: AND 


carenes FRIIF AY PNT PRT A 
TEST #@ 10 = OST MODE C TEST 


MACRO M1113 20-OCT-81 08:47 PAGE $2.3 


;SEE IF THE USER HAS cer seer 

; THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH dm (HAS 
<THE USER TYPED CONTRCL G?) 


SEQUENCE 
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CRF PADDY 
véeecr Zz 


318C 


FRTTE FLTG ENT PRT 


H 5 
MACRO M1113 20-OCT-81 08:47 PAGE 33 SEQUENCE 


"7 — ACCUMULATORS DATA PATTERNS TEST 


- SBTTL TEST # 11 = ACCUMULATORS DATA PATTERNS TEST 


“RES eKeKEReeeeeeeaeeaeaaaakeaatetaeetaneakaeatakenes 


;*TEST 11 ACCUMULATORS DATA PATTERNS TEST 
THIS IS A TEST OF THE FLOATING a cee PROCESSOR ACCUMUL/ TORS. 


; #EACH ACCUMULATOR IS TESTED IN 


1 Hy 3 ty» GENERATED BY FLOATING A ONE ACROSS 


-® 


FIELD OF ZEROES. 
;@ 2 Tes! PATTERN GENERATED BY FLOATING A ZERO ACROSS 


FIELD OF 
: #EACH OF ACCUMULATORS ACO THROUGH ACS IS TESTED. 


‘NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE LOGICAL ‘AND* AND ‘OR’ 
:*OF THE FAILING DATA PATTERNS. THESE CAN BE VERY USEFUL IN DETERMINING 
: # STUCK BITS. IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH (SWR13) 

F, THEN THE — a 12 RECIEVE EACH INDIVIDUAL ERROR MESSAGE PLUS 
SAN ER S AT THE END OF THE TEST. INHIBITING ERROR PRINT OUT 
:*WILL INHIBIT ERROR SUMMARY PRINT OUT, EXCEPT IN THE CASE DESCRIBED BELOW. 
:*T0 GET JUST THE ERROR SUMMARY WITH NO INDIVIDUAL ERROR REPORTS, 
:*SET SWITCH REGISTER BIT13 AND SWITCH REGISTER BIT? BOTH ON. 


Ss THE FOLLOWING PROCEDURE IS PRESENTED TO AID THE TROUBLE 
; * SHOOTER IN SITUATIONS WHERE AM2901 CHIP ISOLATION IS ATTEMPTED. 
: WARNING: THIS PROCEDURE ASSUMES THAT THE FAULT IS IN ONE OF T 

HIPS. TH SUMPTI 

EMAIN BE SEEN 

:*PROBABLILISTICALLY ASSOCIATED WITH THEM. NOTE ALSO THAT THIS 
; *INFORMATION SHOULD a BE TAKEN AS ABSOLUTE, THAT IS 
:*THIS INFORMATION IS THE AUTHOR'S _ FOR ACHIEVING ISOLATION 
: *WHEN CHIP LEVEL REPAIR IS NECESSAR 


* eWHEN THIS TEST HAS FINISHED RUNNING, IF ERRORS HAVE OCCURRED, 


7 *AN ERROR SUMMARY wate L BE TYPED. THUS SUMMARY WILL CONSIST OF TwO 


s STPORT ANT ea S: 

A. FOUR SIXTEEN BIT NUMBERS LABELED THE LOGICAL ‘AND* (‘**') 
* OF THE arith Ee DATA PATTERNS. 
* 8. FOUR SIXTEEN BIT NUMBERS LABELED THE LOGICAL ‘OR (‘+*) 
* OF THE FAILING DATA PATTERNS. 
°f 


:*A BIT STUCK HIGH IN THE HARDWARE WILL SHOW UP AS A 0 IN THAT 
:*BIT POSITION OF THE ‘OR’ OF THE FAILING DATA PATTERNS. 


eA BIT STUCK LOW IN THE HARDWARE WILL SHOW UP AS A 1 IN THAT BIT 


; *POSITION OF THE ‘AND* OF THE FAILING DATA PATTERNS. 


: THUS IF A FAILURE OCCURS: 
A. STUCK HIGHS WILL SHOW AS O'S IN THE ‘OR' to BL ay 
¢@ B. STUCK LOWS WILL SHOW AS 1°S IN THE ‘AND* PATTERN 
:*IF THE FAILURE IS INTERMITEN NT THEN THIS se veh STILL APPLY!!. 


:*IF THE FAILURE MOVES FROM ONE BIT TO ANOTHE 
ITS TO ANOTHER 


a a mm ee ee ee eee ee —_+-—— 
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“KFRPADO FRIIF FLTG PNT PRT A MACRO 1113 20-OCT-81 08:47 PAGE 433 SEQUENCE 
TEST @ 77 = ACCUMULATORS DATA PATTERNS TEST 


s *RATHER THAN USING THE SUMMARY). 


< eMAP THE FOLLOWING NOTATION ONTO EACH BIT POSITION IN THE ‘AND’ 
: SAND THE *OR* PATTERNS WHICH ARE TYPED IN THE ERROR SUMMARY. 


{#A13,A16,.4. A1,A0 615,B14,...81,B80 (€15,C€14,...€1,C0 b15,D14,...¢1,C0 


isin THIS NOTATION A15 THROUGH AO IS THE FIRST OF THE FOUR 16 BIT 
; #0C TAL NUMBERS TYPED, B15 THROUGH BO IS THE SECOND, ETC. 


: STHIS TABLE SHOWS THE CORRESPONDING AM2901 CHIP (°E* NUMBER) 

; #WHICH IS ae tate FOR EACH BIT POSITION USING THE te 

;*NOTATION. NOTE THAT ECO*S TO THE HARDWARE MIGHT MAKE THIS 

; STABLE OBSOLETE IF IT IS NOT _ NOTE ALSO THAT THERE ARE 
*FOUR BITS FOR EACH AM2901 CHIP 


* 

se BITS AM2901 CHIP NUMBER 

** meee. }§}§}§}~}~~—& i eas a as as a ee ae es ee ee ee ee ee 

*® 

_ A15,A14,A13,A12 E37 

:* A11.A10,A9,A8 E45 

:* A7,A6,A5,A4 E34 

:* A3.A2,A1,40 E42 

*® 

* B15,814,813,B12 E33 

8 811.B810.B9,B8 E41 

:* B7,86,B5 ,B4 E36 

* 83,82,81,80 E44 

32 

* €15.C€14,C13.C12 E35 

;* €11.C10.C9.C8 £43 

:* ¢7,06,C5,C4 E38 

i €3,C2,€1,C0 E46 

** 

ie D15,D14,D13,D12 E39 

ze D11,D10.09,08 £47 

a 07.06.0504 E40 

* D3,D2,D1,D0 £48 

**® 

**NOW FIVE IMPORTANT CASES WHICH WILL ARISE WHEN A FAULTY 
**AM2901 IS PRESENT CAN BE DESCRIBED: 

* 

:*1,.) IF ONLY ONE BIT OF THE 64 BITS IS INCORRECT THE CHIP INDICATED 
:* IN THE ABOVE TABLE IS MOST PROBABLY AT FAULT. BUI IF THAT 
it CHIP Is REPLACED AND THE ERROR PERSISTS THEN SUPPOSE THAT 
** 

it WHERE 'L’ IS A, B, C OR D 

;* S 4 OR 

it THEN IN GENERAL ANY OF THE FOUR CHIPS |RESPONS 181 E FOR 

:* AN, BN, CN OR DN COULD BE AT FAULT, WITH LN BEING MOST PROBABLE. 
;* FOR EXAMPLE IF BIT C12 IS FAULTY. " euen ch PE 

i# 1S THE MOST PROBABLE SOURCE OF THE ERROR. It REPAIRING 

:* THAT CHIP DOES NOT REMOVE THE FAULT THEN TRY EACH OF THE 
:* CHIPS ASSOCIATED WITR BiTS A Ai2, Bl2 AND D12 SHOULD BE TRIED 
ie WITH EQUAL PROBABILITY OF THE FAULT BEING 

it IN ANY ONE OF THESE OTHER THREE CHIPS, TRY CHIPS £61, E86. AND E78. 
742.) IF THERE ARE FOUR CONSECUTIVE BITS IN ERROR, FOLLOWING 


co-o— — OO Oe TE EE TET, TTT TTT LL 
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7 A 
- ACCUMULATORS DATA PATTERNS TEST 


Wiw 
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~oSSS=22 
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ee ee ee ee ee ee ee ee ee ee ee ee ee, re ~_ 2 
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. 
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* @e@e @e enenweenenenmenenenernenenennerneeneneeneneeees 


wagte Se Se Be Be Be Fe Se Be Be Se Ge Se Se Ge Be Be Ge Se Se Be Fe Be Se Se Be Se Se Be 


G1: 


SEQUENCE 


PATTERN: 


LN. LN*1, LN*#2 AND LNt5 hs "L’ IS A, 8B, 
AND N=0,4,8 OR 12 
THEN THE 1 Se TABLE SHOULD DIRECTLY IDENTIFY THE 


FAILING CHIP 
IF FOUR BITS ARE DROPPED WHICH FIT THE PATTERN: 
AND DN WHER 


=15,14 OR 0 
THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED WITH EACH OF 
THE BITS AN, BN, CN AND DN COULD BE AT FAULT WITH 
EQUAL PROBABILITY. 


IF 16 BITS ARE IN ERROR, FITTING THE PATTERN: 

AN a - ANt2, oo 3 WHERE N=0,4,8 OR 12 
BN, BN+1, BNt+2, 
CN, CN+1, CNe2. tNe3 


AND 
mete DN+2, AN+3 
THEN ANY ONE OF THE FOUR MOMIPS ASSOCIATED 
WITH THESE BITS COULD BE AT FAULT WITH EQUAL PROBABILITY. 


IF THE FAILING a PATTERNS DISPLAYED iN THE ‘AND’ AND THE ‘OR’ 
— TYPED IN THE SUMMARY DOES NOT —— EXPLICITELY TO 

Y OF THE ABOVE PATTERNS, THEN THE TROUBLE SHOOTER MUST 
INTUITIVELY TRY TO FIND WHICH OF THE ABOVE CASES (1 THROUGH 4) 
IS A ‘BEST FIT" OF THE SYMPTOMS. 


WMARARABRASAAASLAASLASZALAAAAAAAASERASALALEA SERRE RR AA RRR RRR ARES ARRAS SS | 


r8111: 
SETD 
: TEST es 0 WITH _ ONE 


SCOPE 
T sSET FD. 


:SET UP THE LOOP ON ERROR ADDRESS. 
;LOAD TEST PATTERN. 


MOV 

LDD (RO) ,ACO 

STD ACO.A 

LOD ACO.A ;STORE THE TEST PATTERN. 
STL ACO, (R1) 


JSR PC .GCMP ;COMPARE THE DATA READ WITH 


; THAT WHICH WAS WRITTEN. 


TST GFLAG1 

BNE G 

COM GFLAG1 

SEC 

ic G3 

ROL 6(RO) ;GENERATE THE NEXT TEST PATTERN. 
ROL 4(RO) 

ROL 2(RO) 

ROL ( 


RO) 
JSR PC ,,GRESET ae PATTERN IN OUTPUT 


re ce rr em 


61 


CRFRPADO FRTIF FLTG PNT PRT A 
TEST #@ 17 = ACCUMULATORS DATA PATTERNS TEST 


3184 


15356 
7 


14 


“0 


0773 
004737 


s=saseseeeso 
SAPS ee 
YN 

v & 
OWNN ON 


oo o-- 
i 
—— 


000006 
000004 
000002 
014346 


014366 
015132 
015132 


000006 
000004 
000002 
014346 
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001110 


G4: 


GS: 
G6: 


G7: 


ag 


—O 


SEQUENCE 
JSR PC. GSUM : TYPE ERROR SUMMARY. 
= TEST ACCUMULATOR 0 WITH FLOATING ZERO 

MOV #MNUMO , STMPS 

MOV “$T 

MOV #GPAT10,RO 

MOV #GDATOO.R1 

MOV #64, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC. GSETUP -" sLOAD TEST PATTERN. 

MOV #102,R3 

LDD (RO) ,ACO 

$TD 0,AC0 

LDD ACO,ACO :STORE THE TEST PATTERN. 

STD ACO, (R1) 

JSR PC,GCMP : COMPARE THE DATA READ WITH 
“THAT WHICH WAS WRITTEN. 

TST GFLAG1 

BNE G 

COM GFLAG1 

CLC 

BR 6S 

ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 

ROL 4(RO) 

ROL 2(RO) 

ROL (RO) 

JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
: BUFFER. 

SOB R3,64 

JSR PC.GSUM : TYPE ERROR SUMMARY. 

: TEST ACCUMULATOR 1 WITH FLOATING ONE 

MOV #MNUM1 , STMPS 

MOV #G7,$TMP2 

MOV #GPATOO,RO 

MOV #GDATOO,R1 

MOV #67, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC,.GSETUP :LOAD TEST PATTERN. 

MOV #102,R3 

LDD (RO) ACO 

STD ACO,AC1 

LDD AC1,ACO :STORE THE TEST PATTERN. 

STD ACO. (R1) 

JSF. PC, GCMP : COMPARE THE DATA READ WITH 
‘THAT WHICH WAS WRITTEN. 

TST GFLAG1 

BNE 610 

COM GFLAG1 

SEC 

BR 611 

ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 

ROL 4(RO) 

ROL 2(RO) 

ROL (RO) 

JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
>BUFFER. 

SOB R3,67 
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001244 
001236 


001110 


001244 
001236 


001110 


JSR __ PC, GSUM 
;TEST ACCUMULATOR i WITH FLOATING ZERO 


SEQUENCE 


; TYPE ERROR SUMMARY. 


MO De 
MOV #612. $TMP2 
MOV GPAT10,RO 
MOV #GDATOO.R1 
MOV #612, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC GSE TUP sLOAD TEST PATTERN. 
MOV #102,R3 
G12:  LDD (RO) .ACO 
STD ACO,AC1 
LDD AC1,ACO :STORE THE TEST PATTERN. 
STD ACO, (R1) 
JSR PC, GCMP : COMPARE THE DATA READ WITH 
“THAT WHICH WAS WRITTEN. 
TST GFLAG1 
BNE 613 
COM GFLAG1 
CLC 
BR G14 
G13: SEC 
G14: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
ROL 4 (RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
“BUFFER. 
SOB R3,G12 
JSR PC. GSUM : TYPE ERROR SUMMARY. 
: TEST ACCUMULATOR 2 WITH FLOATING ONE 
MOV #MNUM2 , STMP5 
MOV #615, $TMP2 
MOV #GPATOO,RO 
MOV #GDATOO.R1 
MOV #615, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC, GSETUP :LOAD TEST PATTERN. 
MOV #102,R3 
G15: LDD (RO) ,ACO 
$TD ACO,AC2 
LDD €2,AC0 :STORE THE TEST PATTERN. 
§TD ACO, (R1) 
JSR PC.GCMP :COMPARE THE DATA READ WITH 
“THAT WHICH WAS WRITTEN. 
TST GFLAG1 
BNE 6 
COM GFLAG1 
SEC 
BR G17 
G16: CLC 
617: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
ROL 4(RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
: BUFFER. 
SOB R3,615 
JSR PC.GSUM : TYPE ERROR SUMMARY. 


ee ne 


63 


—_——_ ——— ee 


er a et” 


3187 


3188 


3189 


he) 


oS 
NN 


NAL O 


S 
on 


SFas FN SRSRSERR 


LAA AIAIA AAAI Ae Oe A 
POPRQTORITRD Royo) — — a a sat ot ot ot 


MPoMoNnoenoer 


oDO OCOOCOCOOOOCOD COOCOCOOCOOOCOCOCOO C0 CBOOOCOOOOOO DBOOCOCOOOVOOOoO 
—, 
AA 


—+ ee ee a ee eed aed od 3 2 ts es es Ss 4 —_— —2 eee ae ed od oe od 4 oD 


US FUSES RNSANG VORRVUANS 


WW 


MM 


012737 
012737 
012700 
012701 
012737 
094737 
012703 
2410 


—~— 2 
NN NN 
ene 
& 
oO 


N NO 
w Wwe 


Sesses 
SSRWS 


“RFRPADO FRITIF FLTG PNT PRT A 
TEST @ 11 = ACCUMULATORS DATA PATTERNS TEST 


044550 


014366 
015132 
015132 


000006 
000004 
000002 


014346 


014366 
015132 
015132 


000006 
000004 
000002 


014346 


014500 


Mm 5 
MACRO M1113 20-OCT-81 08:47 PAGE 33-5 


001244 


001110 


001244 
001236 


001110 


SEQUENCE 


TEST ACCUMULATOR 2 WITH FLOATING ZERO 
Vv TMP5 


MO d 
MOV #620, $TMP2 
MOV #GPAT10.RO 
MOV #GDATOO.R} 
MOV #620, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC, GSETUP :LOAD TEST PATTERN. 
MOV #102,R3 
G20:  LDD (RO) .ACO 
STD ACO,AC2 
LDD AC2,ACO :STORE THE TEST PATTERN. 
STD ACO, (R1) 
JSP. PC, GCMP : COMPARE THE DATA READ WITH 
“THAT WHICH WAS WRITTEN. 
TST GFLAG1 
BNE G21 
COM GFLAG1 
CLC 
BR G22 
G21: SEC 
G22: ROL 6 (RO) :GENERATE THE NEXT TEST PATTERN. 
ROL 4 (RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
“BUFFER. 
SOB R3,620 
JSR PC. GSUM : TYPE ERROR SUMMARY. 
: TEST ACCUMULATOR 3 WITH FLOATING ONE 
MOV #MNUM3, $TMPS 
MOV #G623,$TMP2 
MOV #GPATOO,RO 
MOV #GDATOO.R1 
MOV #623, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC, GSETUP :LOAD TEST PATTERN. 
MOV #102, 
G23: LDD (RO) ACO 
STD ACO,AC3 
LDD C3. ACO :STORE THE TEST PATTERN. 
STD ACO, (R1) 
JSR PC, GCMP :COMPARE THE DATA READ WITH 
‘THAT WHICH WAS WRITTEN. 
TST GFLAG1 
BNE 4 
COM GFLAG1 
SEC 
BR G25 
G24: CLC 
G25: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
ROL 4(RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET :RESET DEFAULT PATTERN IN OUTPUT 
SOB R3,623 


JSR PC. GSUM 
:TEST ACCUMULATOR $ WITH FLOATING ZERO 


: TYPE ERROR SUMMARY. 
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SEQUENCE 


01 $6 012737 044555 001244 MOV #MNUM3, 
013274 012737 013330 001236 MOV #626, $TMP2 
013302 01 700 015146 MOV #GPAT10.RO 
01 12701 015176 MOV GDATOO.R1 
013312 012737 013330 001110 MOV #626, $LPERR :SET UP THE LOOP ON ERROP ADDRESS. 
01 004737 014270 JSR PC SETUP sLOAD TEST PATTERN. 
313324 012703 000102 MOV #102,R3 
01 17241 626: LOD (RO) ,ACO 
1 17400 STD ACO,AC3 
O13 17240 LDD C3,ACO :STORE THE TEST PATTERN. 
1 174011 STD ACO, (R1) 
013340 004737 014366 JSR PC,GCMP :COMPARE THE DATA READ WITH 
*THAT WHICH WAS WRITTEN. 
| 013344 005737 015132 TST GFLAG1 
| 013350 001 BNE G2? 
| 013352 005137 015132 COM GFLAG1 
| 013356 000241 CLC 
| 01 000401 BR 630 
| 01 000261 G27: SEC 
| 01 006160 000006 G30: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
013370 006160 000004 | ROL 4(RO) 
013374 006160 000002 ROL 2(RO) 
013400 06110 ROL (RO) 
013402 004737 014346 JSR PC, GRESET RESET DEFAULT PATTERN IN OUTPUT 
013406 077330 SOB R3,626 
013410 004737 014500 JSR PC,GSUM :TYPE ERROR SUMMARY. 
3190 :TEST ACCUMULATOR 4 WITH FLOATING ONE 
013414 012737 044564 001244 MOV #MNUMG , $TMP5 
HE ‘ 012737 013456 001236 MOV #631, $TMP2 
013430 012700 015136 MOV #GPATOO, 
013434 012701 015176 MOV AGDATOO,R1 
013440 012737 013456 001110 MOV #631, $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
01 446 004737 014270 JSR PC, GSETUP *LOAD TEST PATTERN. 
01345 012708 000102 MOV #102, 
013456 172410 G31: LDD (RO) ,ACO 
013460 174004 STD ACO, 
013462 172404 LDD AC4,ACO :STORE THE TEST PATTERN. 
013464 174011 STD ACO, (R1) 
013466 004737 014366 JSR PC,GCMP :COMPARE THE DATA READ WITH 
*THAT WHICH WAS WRITTEN. 
013472 005737 015132 TST GFLAG1 
01347 1004 BNE G 
0135 5137 015132 COM GFLAG1 
ot 5 261 SEC 
1 ; 00401 BR 633 
4 1 241 G32: CLC 
1351 906160 00006 G33: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
1351 160 000004 ROL 4(RO) 
1 160 000002 ROL 2(RO) 
1 110 ROL (RO) 
1 737 014346 JSR PC, GRESET RESET DEFAULT PATTERN IN OUTPUT 
tt a 77330 SOB R3,G631 
135 737 «014500 : TYPE ERROR SUMMARY. 


JSR PC, GSUM 
3191 :TEST ACCUMULATOR 4 WITH FLOATING ZERO 
MOV #MNUMG , S$TMPS 


013542 012737 044564 001244 


65 


oOo rr 


espeeserey 
Soro Nr & 


* 
o 


IES. 
ROS 


710 


A AWA 
™~ NNN 
Pett INES 


i ee a a re et st is a ss Ss es — —» ee eed ed ed od ww —<ab abd aad ea enh ahaa aba 


—] 

st at te 

-& 

SRR 
—N 


ocossscscco COOOCCCOOOCCOOO OO OOODOOOOOOO —OOOOOOOOOOOo 


O1e012 


~ 014016 
bt e026 





012737 
012700 
ne 


0061 


B58 


© 
™~ 
™~ 


NS Nos 


SaRVesSsess 
NNN NO oe oo = 
fee —~w 
ALSS=SANSSaa 
N—-NAaownn-ONN 


83 = 


004737 


“a6 PADO FRITFE FLIG PNT PRT A 
TEST @ 11 = ACCUMULATORS DATA PATTERNS TEST 


166 


014366 
015132 
015132 


014346 


014500 


4572 
14060 


MACRO 1113 20-OCT-81 08:47 PAGE 83-5 





001236 #634, STMP2 
MOV #GPAT10.RO 
MOV #GDATOO. 
601110 MOV #634, SLPERR 
JSR PC, GSETU 
MOV #102,R3 
G34: LOD (RO) ACO 
STD ACO, AC 
LDD AC4.ACO 
STD ACO. (R1) 
JSR PC GC 
IST GFLAG1 
BNE G 
COM GFLAG1 
CLC 
BR G36 
G35: SEC 
G36: ROL 6(RO) 
ROL 4(RC: 
ROL 2(RO) 
ROL (RO) 
JSR PC,GRESET 
SOB R3,634 
JSR PC. GSUM 
: TEST ACCUMULATOR § WITH FLOATING ONE 
001244 MOV #MNUMS ,STMPS 
001236 MOV #637 ,STMP2 
MOV #GPATOO,RO 
MOV #GDATOO.R1 
001110 MOV #637, $LPERR 
JSR PC. GSETUP 
MOV 62, 
G37: LDD (RO) ,ACO 
STD ACO,AC 


JSR PC ,GCMP 
TST GFLAG1 
BNE 640 

COM GFLAG1 


SEC 
BR G41 
G40: CLC 
G41: ROL 6(RO) 
ROL 4(RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, GRESET 
$08 R3,G37 
JSR PC. GSUM 
:TEST ACCUMULATOR § with FLOATING ZERO 
001244 MOV #MNUMS , STMPS 
001236 MOV #642, $TMP2 


SEQUENCE 


;SET UP THE LOOP ON ERROR ADDRESS. 
;LOAD TEST PATTEFM, 


:STORE THE TEST PATTERN. 


;COMPARE THE DATA READ WITH 
: THAT WHICH WAS WRITTEN. 


GENERATE THE NEXT TEST PATTERN. 


sRESET DEFAULT PATTERN IN OUTPUT 
;BUFFER. 


: TYPE ERROR SUMMARY. 


:SET UP THE LOOP ON ERROR ADDRESS. 
;LOAD TEST PATTERN. 


:STORE THE TEST PATTERN. 


:COMPARE THE DATA READ WITH 
; THAT WHICH WAS WRITTEN. 


:GENERATE THE NEXT TEST PATTERN, 


sRESET DEFAULT PATTERN IN OUTPUT 
;BUFFER. 


; TYPE ERROR SUMMARY. 


ee ae 


res’ a 





“eFPADO FRTIE FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE $3.8 SEQUENCE 
Tl = ACCUMULATORS DATA PATTERNS TEST 
01 12700 015146 MOV #GPAT10,R0 
016 12701 01517 MOV #GDATOO, 
16 12737 914 001110 MOV #642. $LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
14 90% 7 014 JSR PC SET :LOAD TEST PATTERN. 
14054 012703 000102 MOV #102,R3 
01 172416 642: LDD (RO), ACO 
316 174005 STD ACO,AC5S 
016 172405 LDD ACS,ACO :STORE THE TEST PATTERN. 
O14 174011 STD ACO, (R1) 
014070 024737 0146366 JSR PC,GCMP COMPARE “HE DaTA RE» WITH 
:THAT WHICH WAS WRITTEN 
014074 005737 015132 TST GFLAG! 
0141 001004 BNE G4 
014102 005737 015132 COM GFLAG1 
0141 000241 CLC 
014110 000401 BR 644 
014112 000261 643: SEC 
014114 006160 000006 G44: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 
0141 006160 000004 ROL 4(R0O) 
014124 006160 000002 ROL 2(RO) 
0141 006110 ROL (RO) 
014132 004737 914346 JSR PC ,GRESET :RESET DEFAULT PATTERN IN OUTPUT 
014136 077330 S0B R3,642 
sins 014140 004737 014500 JSR PC,GSUM :TYPE ERROR SUMMARY. 
195 014144 000137 015210 
ip peeeeneeeeeneeet] TANT tt eeeneraneraananne 
19 :* IN CASE OF AN ECO OR CHIP NUMBER CHANGE, CHANGE THE ‘CHPNUM’ ASCII 
198 :* STRING AT THE APPROPRIATE LOCATIONS. 
199 A alata mies aa Bp ye Ngee eh gem ean ait + aged 
00 As an AQ7 AOS B15 B11 B07 BOS C15 C11 CO7 CO3 D15 D1i DO7 DOS 
0¢ Al2 A08 AQ A0O B12 BOB BOS BOD £12 COB C64 COO D12 DOB DOs DOO 
03 014150 105 063 067 CHPNUM : “ASCII 27E37 E45 £34 E42 E33 E41 £36 E44 E35 E43 E38 E46 E39 E47 E40 E487 
05 014250 170000 007400 000360 elt STS: “BORD 170000, 7400, 360.17.7777.170377.177417, 177760 
USE THIS ROUTINE TC INITIALIZE ALL THE DATA BUFFERS. 
0 ons 70 012705 015132 GSETUP: MOV AGFLAG1,RS 
14274 012704 026 #26,R 
014 005025 1$: CLR (R5)+ 
10 014302 077402 $08 R4,1$ 
12 14 012705 015146 MOV #GPAT10.R5 
13 014310 012704 000010 MOV 10,R4 
14 014314 005125 2$: COM (R5)4 
15 014316 077402 $0B R4,28 
13 14 020037 015136 GS1: CMP RO. GPATOO 
18 14324 001401 BEQ 3$ 
19 014326 000207 RTS PC 
1 014 30 012705 015176 3S: MOV #GDATOO,RS 
¢ 14 12704 000004 MOV #4 RG 
14 : 128 4$: COM (R5)+ 
4 014 77% : S0B R4.4$ 
5 014 20 RTS PC 
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001242 


SEQUENCE 


THE DATA WRITTEN MATCHES THE DATA READ. 
m0 #GDATOO,A5 


: SAVE THE RETURN ADDRESS. 
sCOMPUTE ‘OR’ OF BAD DATA. 


; INCREMENT ERROR COUNT. 


~ a HAVE OCCURRED AND WHETHER OR NOT AN ERROR SUMMARY 


ANY ERRORS? 

;BRANCH IF NOT 

; INHIBIT ERROR PRINT OUT? 
;BRANCH IF NOT INHIBITED 
;PRINT SUMMARY? 

sBRANCH IF NOT 

sEXIT - NO ERRORS TO REPORT 
;YES PRINT SUMMARY. 


;SAVE RETURN ADDRESS FOR POSSIBLE LOOPING 


:SAVE RO 
:SAVE R1 
:SAVE R2 
sMOVE ADDRESS OF CHIP NUMBER yi TO RO 


;MOVE ADDRESS OF ‘AND* DATA TO 
sMOVE ASCII °?° TO NEXT 3 LOCATIONS 


GRESET: MOV #GDATOO.RS 
MOV #4 RS 

1$: CLR (R5)+ 
SOR R4.1$ 
IMP GSi 

sSEE IF 

GCMP: V 
MOV #4 Ro 
MOV RO,R2 

1$: CMP (R3)+, (RS) 
BEQ 2$ 
JMP GERR1 

23: S08 .1$ 
RTS 

:COME HERE TO REPORT AND RECORD ERRORS. 

GERR1: MOV (SP) +, GADR 
MOV ‘ 
MOV : 
MOV #4 RS 

1$: BIS (RO), 10(R5) 
MOV (RO) +,R2 
COM 
BIC R2,(R5)+ 
SOB 1$ 
MOV 1240,R0 
INC GFLAG2 
MOV RO, STMPS 
MOV #GDATOO, STMP4 

3$: ERROR +44 
MP @GADR 

sSEE IF 

: SHOULD . 

GSUM: TST GF LAG2 
BEQ 100$ 
BIT #SW13,aSwWR 
BEQ 
BIT #SW7,aSwR 
BNE 1$ 

100$: RTS PC 

1$: MOV GFLAG2 . STMPG 
MOV #GANDO, $TMP 
MOV #GORO, $TMP4 
MOV (SP)+,GADR 
MOV #2$, SERRPC 
MOVB #45.$ITEMB 

23: JSR PC .ERTYPE 
MOV ~~ (SP) 
MOV R1,-(SP) 
MOV R2,-(SP) 
MOV #CHPICIM, RO 
MC. 0,R2 
MOVB "7 11§ 
MOVB #'?.11$+1 
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015126 


015124 


o=— 
a eed 
NO 


3$: 
4$: 


5$: 


6$: 


7$: 


9$: 


10$: 
11$: 


GFLAG!: 


ASCIZ 


#°?,11$+2 
11 


#RITSTS.RI 
ser? OR? 


5 
O(RO), a 


(RO), 11$+1 
Ty 2 11$+2 


#4,R0 
#BITSTS+10,R1 
4$ 


#2,R2 
#GAND0+10,R2 


27 (SP) 
10(R1), (SP) 
oe 


7 
0O(RO),.11$ 
1(RO). 118+ 1 
2(RO) .11$+2 
-11$ | 

#4.RO 
#BITSTS+10,R1 
#BITSTS.R1 
#GAND0+10,R2 
#°?,11$ 

8$ 


SEQUENCE 

; TYPE ERROR MESSAGE BELOW 

VE ADDRESS OF BIT TESTING TO R1 
: SEE IF ANY BITS IN THE GROUP WERE SET 

CHIP # PRIWT IF NOT 

MOVE 1ST ASCII DIGIT TO LOCATION 

VE 24D ASCII DIGIY TO LOCATION 
sMOVE SRD ASCII DIGIT TO LOCATION 
s;TYPE THE CHIP fe 
:MOVE ASCII POINTER TO NEXT CHIP NUMBER 
;SEE IF WE ARE DONE CHECKING THE ‘AND’ SETS 
map to BACK I T 


TION 
;SEE IF ALL |, ‘eee HAVE BEEN CHECKED 
:BRANCH BACK 
sRESET CHIP NUMBER. ASCII POINTER IN RO 
MOVE S ng lt aE —- TO R2 


; ON 

:CLEAR BITS NOT UNDER TEST 

;ScE IF ANY BITS sy FOUND CLEAR 
;BRANCH AROUND CHIP # PRINTING IF OK 

:MOVE 1ST ASCII DIGIT TO LOCATION 

:MOVE 2ND ASCII DIGIT TO LOCATION 

MOVE a ASCII DIGIT TO LOCATION 

TYPE THE CHIP NUMBER 

:PGINT RO TO NEXT ASCII CHIP REPRESENTATION 
7SEE IF WE ARE DONE CHECKING THE ‘AND’ SETS 
:BRANCH BACK IF NOT 

at BIT oe CHECK WORDS ADDRESS TO R17 
:MAP TO NEXT "AND' LOCAT 


;SEE IF ALL ‘AND LOCATIONS HAVE BEEN CHECKED 
>BRANCH BACK IF NOT 
:SEE IF ANY CHIP NUMBER HAS BEEN LOADED 
BRANCH TO RETURN JUMP IF 

TYPE THE QUEST 
: TYPE A <CRLF> 


RE 
:RESTORE R1 
:RESTORE RO 


<CRLF >’ CHIP NUMBERS TO INITIALLY LOOK AT*<CRLF> 
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ION MARKS - COULDN'T ISOLATE TO A CHI® 
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TEST @ 11 = ACCUMULATORS DATA PATTERNS TEST 


0 015162 177777 -7 

1 015164 177777 -1 

¢ 0151 0 

ot! 0 

1517 0 

5 015174 0 

1517 0 

13 0 

5 15 0 

$0 015 0 
351 01521 
01521 





:GO INITIALIZE THE FPS AND STACK; AND 
:SEE IF THE 


or HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH — (HAS 
;THE USER TYPED CONTROL G?) 


coeenee FRIIF FLTG PNT PRT A MACRO M1113 20-OCT-61 08:47 PAGE x" SEQUENCE 71 
ST @ 12 = FPP ACCUMULATO®S DUAL ADDRESS TEST 


3358 - SBTTL TEST # 12 - FPP ACCUMULATORS DUAL ADDRESS TEST 
PTT STITT LL IILLLILIILiLiLitiitilititiliii iii 


TEST 12 FPP ACCUMULATORS DUAL ADPRESS TEST 


eTHIS TEST PERFORMS A DUAL ADDRESSING TEST ON THE FLOATING ACCUMULATORS. 
senor THAT ACCUMULATOR ZERO IS USED TO ACCESS ALL THE O/HERS. 


a a TE eR2aaazaeeaeaeeaeekenaeaeaeeeee 


013312 902006 S112: SCOPE 
$9 015214 012737 015222 001110 MOV #H1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
| 1 015222 005037 015746 H1: CLR HF LAG 
¢ 015 $ 012700 015750 MOV #HA1W.RO INITIALIZE THE LOAD BUFFER DATA. 
015 012701 016070 MOV #HDATI,R1 
| O13 012703 000024 MOV #24, 
§ 015242 012120 H2: MOV (R1)+,(RO)+ 
| 015244 077302 S0B R3,H2 
| 3 4 015246 004737 015674 JSR PC,HCLR =CLEAR THE OUTPUT DATA BUFFER. 
3 0 015252 170011 H3: SETD 
3371 :LOAD ACCUMULATOR 1 
015254 012700 015750 MOV #HA1w,RO 
013260 172410 LDD (RO), ACO 
015262 174001 STD 0,AC1 
3372 :LOAD ACCUMULATOR 
015264 012700 015760 MOV #HA2W,RO 
015270 172410 LDD (RO) ACO 
015272 174002 STD ACO,AC2 
3373 LOAD ACCUMULATOR 3 
015274 612700 015770 MOV w.RO 
015 00 172410 LDD (RO) .ACO 
015 174003 STD ACO,AC3 
3374 LOAD ACCUMULATOR 4 
015304 013700 016000 MOV #HAGW, RO 
015310 172410 LDD (RO) ,ACO 
015312 174004 STD ACO,AC4 
3375 LOAD ACCUMULATOR 
015314 013700 016010 MOV #HASW,RO 
015 30 172410 LDD (RO) ACO 
% 015322 174005 STD ACO,ACS 
iv 015324 004737 015560 H4: JSF PC,HSTD :60 READ ALL ACCUMULATORS BACK. 
015330 004737 015636 JSR PC .HCMP :SEE IF DATA IS CORRECT. 
3381 : COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 1, 
:RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 
15334 012700 015750 MOV #HA1W,RO 
FT 012702 000004 MOV #4,R2 
15344 010001 MOV RO,R1 
015 121 H5: COM (Ri)+ 
O13 $0 172410 LDD (RO) ,ACO 
15352 174001 STD ACO,AC1 
013 54 004737 015560 JSR PC .HSTD :READ ALL THE ACCUMULATORS BACK. 
15 004737 0156 JSR PC .HCMP =CHECK THE DATA. 
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$08 R2,H5 
:COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 


;RELOAD THAT AC 


2. 
CUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


® ATA, 
MOV #HA2W RO 
MOV #4 ,R2 
MOV RO.R1 
H6 COM (Ri)+ 
LDD (RO), ACO 
STD ACO.AC 
JSR PC.HSTD :READ ALL THE ACCUMULATORS BACK. 
JSR pC. HCAP *CHECK THE DATA 


R2 
;COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 3, 
: RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


TA. 
MOV #HA3SW,RO 
MOV #4,R2 
MOV RO.R1 

H7: COM (Ri)+ 
LDD (RO) ACC 
STD 0,AC3 
JSR PC .HSTD :READ ALL THE ACCUMULATORS BACK. 
JSR pC .HCAP “CHECK THE DATA 

: COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 4, 

:RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 
MOV #HAGW,RO 
MOV Re 
MOV 0.R1 

H10: COM (Ri)+ 
LDD (RO) ,ACO 
§TD 0,A 
JSR PC,HSTD :READ ALL THE ACCUMULATORS BACK. 
JSR pc enc *CHECK THE DATA 


0 
: COMPL IMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 5, 
:RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


:THE DATA. 


Hil: 


H12: 


#HASW,RC 
Re 


sREAD ALL THE ACCUMULATORS BACK. 
;CHECK THE DATA. 
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015074 
016020 


0160350 
016040 
016050 


016060 


016020 
000024 


015750 
001236 
000012 
000010 


016140 


STD 
:STORE ACCUMULATOR 2 
MO #HA 


STD 
: STORE ACCUMULATOR 5 


MACRO tye gees 08:47 PAGE ba 5 


th es ALL wR oHCLR IN THE OUTPUT tii? 


HSTD: JSR 

; STORE ACCUMULATOR 1 
MOV HA 
LOD AC1,ACO 


V 
LDD AC2.ACO 


V . 
LDD AC3,ACO 


STD ACO, (R4) 
:STORE ACCUMULATOR 4 

MOV 4R.R 

LOD AC4,ACO 

STD ACO. (R4) 
:STORE ACCUMULATOR § 

MOV HHASR RS 

LDD AC5,ACO 


RTS 
:COMPARE DATA LOADED WITH DATA READ. 
HCMP: MOV (SP) +, HADR 

MOV ‘ 

MOV #HAIR._RG 

MOV #24,R 
HCMP1: CMP (R334, (R4)+ 

BEO HCMP2 

JMP HERROR 
HCMP2: SOB RS HCMP1 

MP @HADR 
:CLEAR THE DATA OUTPUT BUFFER. 

HCLR: MOV #HAIR RG 

MOV #24,R5 
HCLR1: CLR (R4S+ 

S08 RS,HCLR1 

RTS PC 
=REPORT ERFOR. 


HERROR: 


MOV #HAIW RS 


MOV 
1$: MOV RS (RG)+ 
ADD #10,R3 
S0B R5,1$ 
23: ERROR +46 
JMP HDONE 
HADR: -WORD 0 
HFLAG: .WORD 0 


MOV #STMP2 RG 
#12,R5 


CLEAR ALL OUTPUT BUFFERS. 


; SAVE RETURN ADDRESS. 


SEQUENCE 


73 





CKREPADO FRPIIF FLTG PNT PRT A MACRO M1113 20-CCT-81 08:47 PAGE 4-8 SEQUENCE 74 
TEST # 12 = FPP ACCUMULATORS DUAL ADDRESS TEST 

8 HAlW: .WORD 0,0.0.0 
Ww: . WORD 0.0.0.0 
-WORD 0.0.0.0 
HAS - WORD 0,0,0.,0 
ret HASW -WORD 0,0,0,0 
rk} HAIR -WORD 0,0.0.0 
4 -WORD 0,0,0.0 
44 HA -WORD Q,0,0.0 
45 HAGR -WORD 0,0.,0,0 
re HASR -WORD 0,0,0.,0 

48 Seth: heal 073567 073567 HDAT1 WORD 73567,73567,73567,73567 

49 0161 063146 063146 063146 HDAT2 WORD 63146,63146,63146,63146 

50 016110 0104621 010421 010421 HDAT3: .WORD 10421,10421,10421,10421 

51 tye 031463 031463 031463 HDAT4: .WORD 31463,31463,31463,51463 

26 161 042104 042104 042104 HDATS: .WORD 42104,42104,42104,42104 

53 016140 HDONE : 
016140 104413 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 
>SEE IF THE USER HAS EXPRESSED 


-THE DESIRE TO CHANGE THE SOFTWARE 
*VIRTUAL CONSOLE SWITCH REGISTER (HAS 
-THE USER TYPED CONTROL G?). 
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016152 
016664 
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016674 
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016664 


016442 
000001 
016626 
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001110 


000244 


000004 


001110 


000244 
000004 


- SBTTL TEST # 13 = FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 


Fe aeeaeeaaaaaaaraeadcaenerereeeeaangangaagnaegnagananaaeeiaaanenarerenes 


FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 


:*THIS IS A TEST OF FSRC MODE 0 WITH ACCUMULATORS 6 AND 7 USE OF 
THESE NON-EXISTENT ACCUMULATORS SHOULD RESULi IN A TRAP TO 244 


: TEST 13 


-*E J THER OF 


<ul TH FEC=2 (ILLEGAL FPP INSTRUCTION). 


EE Sr RN RY Fo a eT 


SCOPE 


1$113: 
1: 


1$: SETD 


S5: CMP 


S6: SOB 
JMP 


gyOw TEST AC6. 


MOV 
1$: SETD 


#1$,SLPERR 


#SPAT10.RO 
(RO) ,ACO 


#SERRO,FPVECT 


#1,R0 
#SERR1,ERRVECT 
R3 


R3 
R3 


#SDATOO,R1 
ACO, (R1) 


#SDATOO,R1 
#SPAT10,R2 


#4 .R 
(R1)+, (R2)+ 


SERR2 
R3.S5 


SERR3 

#1$,SLPERR 

#SPAT10 RO 
»,Ac6 


#SERRG ,FPVECT 
#SERRS ,ERRVECT 
R3 


AC6,ACO 


SET UP 


:SET UP THE LOOP ON ERROR ADDRESS. 
“LOAD ACO 


;USE OF THE NON-EXISTENT AC- 
og oe SHOULD RESULT IN 
ie TRAP TO 244, 

A FAILURE IN THE FSRC FLOWS 
:WILL Wy IN AN ODD ADDRESS 


:NO TRAP OCCURRED! ! 
:SEE IF ACO WAS MODIFIED. 


THE LOOP ON ERROR ADDRESS. 


LOAD ACO 


SEQUENCE 
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“mS PADO FRIIF F 
TEST # 13 = FSR 
3509 p16368 
Oi ona 
512 016324 
218 b168%6 

514 

515 016332 
21$ 016 

517 016 
518 016 
519 01635 
$20 016352 
521 He te, 
5 ¢ 916 

5 
ee 4 

525 016364 
35 : 016370 
$2 i 016372 
$e 9 016376 
3531 016404 
35 ¢ 016410 
2535 016412 
$oRe 016414 
535 016416 
3a9 016422 
38 ore 
539 016426 
540 016430 

41 0164 

rk 016436 

4 

44 016442 

45 016446 

+6 016450 

4 by ote: 

48 016462 

49 

50 

51 0164 

2¢ 64 

5 64 

54 

55 
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016536 
016562 


016206 
042534 
016254 
001236 


100200 


000002 
000216 
016316 


042534 
016704 


100200 
001240 


000154 
000002 
001240 
000134 


016204 


MACRO M1113 2 
C MODE C WI"H ILLEGAL ACCUMULAT 


016660 


016660 


001242 


001242 


001236 


6 
O-OCT-81 08:47 PAGE 5 
OR TEST 


R3 


$13: INC R3 
MOV #SDATOO,R1 
STD ACO, (R1) 
MOV #SDATOO,R1 
MOV #SPAT10.R2 
MOV #4 R3 
$11: CMP (Ri) +, (R2)+ 
BEO $12 
JMP SERRO 
$12: $08 R3,S11 
JMP ERR7 
= TRAPPED TO 244. 
SERRO: CMP (SP) .#S3 
BEQ 1 
JMP FPSPUR 
1$: MOV #S7,SADR 
SERR10: MOV (SP) ,$TMP2 
CMP (SP)+,(SP)+ 
CLR R4 
STFPS R4 
CMP #100200,R4 
BNE SERR15 
CLR R4 
STST R6 
CMP #2,R4 
BNE SERR20 
JMP @SADR 
SERR4: CMP (SP) .#S9 
BEQ 1$ 
JMP FPSPUR 
1$: MOV #SDONE , SADR 
BR SERR10 
:REPORT FPS FAILURE: 
SERR15: MO\ #100200, $TMP4 
MOV 4, $TMPS 
1$: ERROR +11 
JMP @SADR 
sREPORT FEC BAD: 
SERR20: MOV #2, STMP4 
MOV R4.$TMP3 
1$: ERROR +120 
JMP @SADR 


w” 
mn 


1$: ERROR 


z;ACO WAS MODIFIED. (BUT FSRC) FORK 
RR2: MOV #S2,STMP2 


+112 


SEQUENCE 76 


;NO TRAP! GET ACC 
sWAS ACO MODIFIED. 


3PC OF TRAP CORRECT? 


:1S FPS CORRECT? 


21S FEC CORRECT? 


FAILED. 


3566 016534 
567 016536 
568 016544 
4 44 016546 
5 
572 916556 
258 0188 
574 016 
575 3182 
376 1657 
33 
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MMAMAMAM AMAA 


VERRAN LS 


WNAANANAWAAAANANw 


SSS GSES SPEER RRRE SERS 


soporanesss 


oo OOOO COOOCOOCOOoO O0OOO COOOOO COCOO OOOCOO 
—— at ttt tt ott eee ot 


6670 

6672 

6674 

et 6676 
10 016700 
ae 6702 
$613 016704 
6704 
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0162046 (01236 


016314 001236 


016206 
016212 
042566 
001236 


016314 
016316 
042566 
001236 


MACRO M1113 ag ts 08:47 PAGE 55 $ 


SEQUENCE 


th | apes OF (BUT FSRC) CAUSED AN ODD ADDRESS TRAP TO 4 
SERR MP (SP) ,#S3 


BR SDONE 

MOV a8 $TMP2 

ERROR +114 

BR SDONE 
SERR3: MOV #S2,$TMP2 
1$: ERROR +111 

BR SDONE 
SERR7: MOV #S8,$TMP2 
1$: ERROR +113 

BR SDONE 

C 

BEQ 1$ 

CMP (SP) .#S4 

BEQ 1$ 

JMP CPSPUR 
i$: MOV (SP) ,$TMP2 

CMP (SP)+, (SP) + 
2$: ERROR +115 

BR SDONE 
SERRS: CMP (SP) ,#S8 

BEQ 1$ 

CMP (SP) .#S9 

BEQ 

JMP CPSPUR 
1$: MOV (SP), $TMP2 

CMP (SP)+, (SP) + 
2$: ERROR +116 

BR SDONE 
SADR: 0, 
SPAT10: .WORD 10421 
SPAT11: .WORD 21042 
SPAT12: .WORD 31463 
SPAT13: .WORD 42104 
SDATOO: .WORD 0 
SDATO1: .WORD 0 
SDATO2: .WORD 0 
SDATO3: .WORD 0 
SDONE : 

RSETUP 


:DID TRAP OCCUR ON TESTED INSTRUCTION? 


;DID TRAP OCCUR ON TEST INSTRUCTION? 


:G0 oho ee THE FPS AND STACK; AND 
F THE USER HAS EXPR “F 
TO CHANGE T 


} RE C SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 
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TEST # 14 = FSRC MODE 
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SEQUENCE 


2 TEST 
_SBITL TEST # 14 - FSRC MODE 2 TEST 
5 AAAS AA AAAAAAREARARHAAAAAAAAAAAAARAKARARARAERAKAAKAARAKAR AAR A AS 
> TEST 14 FSRC MODE 2 TEST 
-* 
:* THIS IS A TEST OF FSRC MODE 2, AUTO 
>* INCREMENT MODE. 
** 
Perri iti t iit i iti tii tis tii iii titiiiitiiiiitiiiitiiiiiiiiiiiiiiiit 
TST14: SC 
016716 001110 MOV #J1,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
Ji: 
SETD :SET DOUBLE MODE 
017174 MOV #JDATO,RO 
LDD (RO) ,ACO :LOAD ACO 
017154 MOV #)DAT10.RO 
017024 000004 MOV #JERRO,ERRVECT 
J2: LDD (RO)+,ACO :TEST INSTRUCTION 
J3: INC R3 
J4: INC R3 
017164 MOV #JDATOO,R1 
STD ACO, (R1) :PICK UP RESULTS 
017144 CMP RO, AJBUFO :WAS AN AUTO 
BNE 1$ =DECREMENT EXECUTED? 
BR JERR1 
017154 1$: MOV #JDATIO,R2 :1S DATA CORRECT? 
017164 MOV #JDATOO,R3 
000004 MOV #4,R 
JS: CMP (R2)+, (R3)+ 
BEQ J 
BR JERR2 
J6: SOB R4,J5 
017164 CMP #JDATIO+10,RO  ;WAS RO INCREM. 
BEOQ J? “BY 10 (OCTAL) 
BR JERR1 
J7: BR JDONE 
: IF A TRAP THROUGH 4 OCCURS COME HERE 
016744 JERRO: CMP (SP) ,#J3 =SEE If THE TRAP 
BEQ J [OCCURRED ON THE 
016746 CMP (SP) #4 -TESTED INSTRUCTION 
042566 JMP CPSPUR 
000762 001240 410: MOV #762,$TMP3 =REPORT FSRC FLOW 
000322 001242 MOV #322, STMP4 : FAILURE 
001236 MOV (SP) ,$TMP2 
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CMP (SP)+_ (SP) 
1$: ERROR +52 
BR JDONE 
JERRI: :REPORT, RO NOT 
001236 MOV #J2,STMP2 :CORRECTLY AFFECTED 
MOV RO. STMP3 
001242 MOV #JDATI0+10,STMP4 
1$: ERROR +53 
JDONE 
zREPORT DATA FAILURE 
JERR2: 
001236 MOV #J52,.$TMP2 
001240 MOV #IDATIO, STMP3 
001242 MOV #JDATOO,STMP4 
18: ERROR +54 
JDONE 
JBUFO: .WORD 010421 
JBUF1: .WORD 021042 
JBUF2: .WORD 042104 
JBUF3: .WORD 031463 
JDATIO: .WORD 052525 
JDATI1: .WORD 114631 
JDATI -WORD 063146 
JDATI -WORD 073567 
JDATOO: .WORD 0 
JDATO1: .WORD 0 
JDATO2: .WORD 0 
JDATOS: .WORD 0 
JDATO: .WORD <1 
JDAT1: .WORD -1 
JDAT -WORD -1 
JDAT -WORD -1 
JDONE : 
RSE TuP 


:GO INITIALIZE THE FPS 
: iF THE USER HAS EX 


[THE DESIRE 70 C T 
“VIRTUAL CONSOLE SWITCH 
“THE USER TYPED CONTROL 
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SEQUENCE 


TEST # 15 = FSRC MODE 4 TEST 


"SS Oeaeeeeeeeeeeeeeeeeeeeeeeeeeeaeeaneeeteneeeeeeeeeeeeeenkheeaereenere 


> TEST 15 


FSRC MODE 4 TEST 


* THIS IS A TEST OF FSRC MODE 4, AUTO 


;* DeCREMENT MODE. 


'WeneeRAARAREREABASAARARALAASBABRARAASLARARARERBRARARARR RRR RRA RR RARER SERRE SRR SE | 


TS115: 


017216 001110 


017472 


017452 
017324 


917462 


017462 
017442 
017462 
000004 


017442 


017244 
017246 
042566 


K1: 


000004 


Ke: 
K3: 
K4: 


K7: 


SCOPE 


#k1,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
:SET DOUBLE MODE 
#KPATO,RO 
(RO) ,ACO :LOAD A DEFAULT 
“PATTERN INTO ACO 

#KBUF ORO 
#KERRO,ERRVECT 
= RO) .ACO : TEST INSTRUCTION 
R3 
#KDATOO,R1 
ACO, (R1) :PICK UP THE RESULT 
RO,#KBUFO+10  :WAS AN AUTO 
1 “INCREMENT EXECUTED 
KERR1 
#KDATIO,R2 :1S DATA CORRECT? 
#KDATOO.R3 
#4 RG 
(R2)+, (R3)+ 
K6 
KERR2 

k5 
#KBUFO-10,RO =: WAS RO DECREMENTED 
K7 ;PROPERLY? 
KERR1 
KDONE 


; TRAP TO HERE ON AN ODD ADDRESS ERROR 


KERRO: 


000804 001240 «10: 


000324 
0012 


001242 


(SP) ,#K3 ;SEE IF THE ERROR 

K1 ;OCCURRED AT THE 
— s INSTRUCTION TESTED. 
CPSPUR 

#762, $TMP3 REPORT FAILURE IN 
#324 ,STMP4 sFSRC FLOWS 


(SP) ,STMP2 
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1§: ERROR +55 
BR KDONE 
KERRI: sREPORT, RO 
MOV #k2, STMP2 INCORRECTLY AFFECTEL. 
MOV RO, STMPS 
MOV #KDATIO, STMP4 
1§: ERROR +56 
KDONE 
;REPORT DATA FAILURE 
KERR2: 
MOV #K2,STMP2 
MOV #KDATIO, STMP3 
MOV #KDATOO,STMP4 
1§: ERROR +57 
BR K DONE 
KDATIO: .WORD 052525 
KDATI1: .WORD 114631 
KDAT]I -WORD 063140 
KDATI -WORD 073567 
KBUFO: .WORD 010421 
KBUFIi: .WORD 031463 
KBUF2: .WORD 042104 
KBUF3: .WORD 021042 
KDATOO: .WwORD 0 
KDATO1: .WORD 0 
KDATO2: .WORD 
KDATOS: .WORD 0 
KPATO: .WORD -1 
KPAT1 ~WORD -1 
KPAT2: .WORD <1 
DPATS: .WORD -1 
KDONE : 
RSETUP 


mm mm me eee | eee ee 


> G0 ae Me THE FPS AND STACK; AND 
F THE U D 


: OC E THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH — (HAS 
: THE USER TYPED CONTROL G?) 


— ee ee ee oo 


SEQUENCE 


8) 


€F PADC 


w 
R— 
vo 


WVwnw 





rs 
SS ¥SR 


Vw Uw OF 


sea $8 SS S¥ BSE 


$120 


— nN — — 


12737 
10037 


FRITS 6 \TG PNT PRT A 


01,574 


017764 


Bi777e 
000004 


020006 


020020 


020012 


177777 
177777 


Sats 
020020 
000004 


7 
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"EST #@ 76 = FSAC MODE 2, wi Th FD=0, TES! 
36°? 


001110 


001236 


. SBTTL 


SEQUENCE 


TEST # 16 = FSRC MODE 2, WITH FD=0, TEST 


**S SSSR eeeaeaeaeaeaaeaeaaeekenkanaeeetaaeeaeteeteneate 


FSRC MODE 2, WITH FD=0, TEST 


-eTEST 16 


Ps 
» 


TST16: 


L1: 


1$: 


1$: 


L5: 


L6: 


LERR1: 


(AUTO INCREMENT) 


** SRSA AARaFeeKeRKetaeaKaRakaeakeaeaaereaenaaneneeaeeeeese 


SCOPE 


MOV 


SETD 


#L1,SLPERR 


#LPAT10.RO 
(RO) ,ACO 


#LDATIO,RO 
eel 


(R1)+, (RO)+ 
R2,1$ 


#LDAT1I0,RO 
R3 


(RO)+,ACO 
R3 


#LDATOO,R1 
ACO, (R1) 


RO ,ALDATI2 
1$ 

LERR1 
#-1,LDATI 


(R2)+,(R3)+ 
6 


L 
LERR2 
R4,L5 


LDONE 


RO, STMPS 


:* THIS IS A TEST OF FSRC MODE 2 WITH 
z* Fd=0. 


:SET UP THE LOOP ON ERROR ADDRESS. 
:SET DOUBLE MODE 


;LOAD ACO 
;SET UP THE INPUT 
;DATA 


;CLEAR FD. 


:SET FD 


sPICK UP RESULTS 


WAS RO INCREMENTED 
sCORRECTLY BY 4 


:I1S DATA CORRECT 


sREPORT FAILURE 
a red INCREMENTED 


? 
“KFPADO FRTIF FLTG PNT PRT A MACRO tts 20-OCT-81 08:47 PAGE 58-1 SEQUENCE 83 
TEST # 16 = FSRC MODE 2, wi TH FD=0, TEST 





017654 012737 020012 001242 MOV #LDPATI2,$TAP4 
917662 106060 1$: ERROR +60 
017664 000461 BR LDONE 
017666 LERR3: :REPORT DATA FAILURE. 
17696 012737 017554 001236 MOV #L2,STMP2 
17676 012737 02 001240 MOV #LDATIO, $TMP3 
17702 012737 020026 001242 MOV #LDATOO, STMP4 
17710 102061 1$: ERROR +61 
?5 017712 020446 BR LDONE 
79 017714 01 702 017774 LERR2: MOV #LPAT20,R2 :DID (BUT FD) 
78 017720 012703 020020 MOV #LDATOO.R3 “FAIL. 
79 017726 012704 000004 MOV #4 RG 
017730 02ea23 1$: CMP = (R2) +, (R3)+ 
1 2177 1355 BNE LERR3 
017754 077408 $08 
17736 0127 017554 001236 MOV #L2,$TMP2 
017744 012737 020006 001240 MOV #LDATIO, STMP3 
§ 017752 012737 020022 001242 MOV #LDATO1 .$TMPG 
017760 104062 2$: ERROR +62 
017762 000422 BR LDONE 
9 017764 177777 LPAT10: .WORD <1 
017766 177777 LPAT11: .WORD -1 
91 017770 177777 LPATI2: .WORD <1 
9 017772 177777 LPAT12: .WORD <1 
94 017774 052525 LPAT20: .WORD 052525 
§ 017776 114631 LPAT21: .WORD 114631 
Og 0009 oeates LPAT22: .WORD 06317 
97 020002 073567 000001 LPAT23: .WORD 073567,1 
stage 000000 LDATIO: .WORD 0 
aD S 10 000900 LDATI1: .WORD 0 
900 020012 000000 LDATI2: .WwORD 0 
901 020014 000000 000001 LDATI3: .WORD 0,1 
ae 020020 000000 LDATOO: .WORD 0 
020922 LDATO1: .WORD OC 
0 24 090000 LDATO2: .WORD 0 
905 020026 000000 LDATO3: .WORD 0 
3909 020030 LDONE : 
020030 104413 RSE TUP G0 INITIALIZE THE FPS AND STACK; AND 


; E SOF TWARE 
:VIRTUAL CONSOLE SWITCH a (HAS 
; THE USER TYPED CONTROL G?) 


Law 
oO 
>8 





“eS PADO FRITE ELTG PNT PRT A MACRO M1113 gonot Te! 08:47 PAGE g, ? SF QUENCE 84 
"EST # 77 = ESRC MODE 2 wl GR7. IMMEDIATE MODE, TEST 
391? .SBTTL TEST # 17 - FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 
Sy eeeteenecarareeeeerertereeeeranenagaenanaeaeeenaneaeesanedgaearaeneene 
;*TEST 17 FSRC MODE 2 WITH GR7. IMMEDIATE MODE, TEST 
a THIS IS A TEST OF FSRC MODE 2 
>* USING GR7 (THE PC). THIS IS IMMEDIATE 
:* MOD eo 
POPPE O OTT T OTOL OTT OST TTT OTTOT TTT TTT TTT TT TOTTI TTT TT TTT TTT Tir 
™ 020032 020004 1ST17: SCOPE 
3019 phot ni M1: 
: : 020034 170011 SETD 
922 020036 012700 020330 MOV #MPAT10.RO 
9 ¢ tte: 172610 LDD (RO) ,ACO :LOAD BACKROUND 
934 “PATTERN INTO ACO. 
925 020044 005004 CLR R4 
3 6 020046 012737 020270 000004 MOV #MERR3,ERRVECT 
3928 020054 172427 000000 M15: LDD #0.AC0 :TEST INSTRUCTION 
39 020056 =,-2 
9 020056 005204 -WORD 5204 
931 020060 005204 M2: INC R4 :NOTE THAT 
zg : 020062 005204 M3: INC R4 -G05206=INC R4 
3933 020064 005204 MG: INC R4 
9 0066 020427 000003 CMP R4 #3 :SEE IF THE PC 
020072 001401 BEQ 1$ “WAS INCREMENTED 
0074 000443 BR MERRO :BY 2 DURING THE 
: INSTRUCTION. IF 
:NOT THEN A BAD 
*CONSTANT WAS GENERATED 
76 012700 020350 1$: MOV #MDATOO,RO 
02 174010 STD ACO, (RO) :GET THE DATA 
04 012700 020350 MOV ATOO,RO 
10 02 720 005204 CMP #5004 (RO)* :1$ THE DATA CORRECT? 
14 1401 BEQ M5 
16 000451 BR RR1 
012701 000003 MS: MOV #3.R1 
4 005720 M6: TST (RO) + 
6 001002 BNE 7 
07710 S05 R1,M6 
32 000512 sta 
34 012700 020350 M7: MOV #MDATOO,RO :DID (BUT GRM) FAIL? 
40 012701 MOV #4,R1 
44 022720 005204 M8: CMP #5204, (RO) * 
50 1401 BEQ m9 
$2 33 BR MERR1 
54 077105 m9: S08 Ri, 
56 MERR2: REPORT FAILURE 
S56 012737 020054 001236 MOV 4#™15,$TMP -OF (BUT GR?) 
$6 4 737 020340 001240 MOV #MPAT20,STMP3 
2 012737 020350 001242 MOV #MDATOO, STMP4 
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“KFPADO FRITF FLIG ENT PRT A 
TEST #@ 17 = ESRC 


042566 


0012490 
020060 
020054 


MACRO #1113 20-O0CT-8 
2 wil" GR7, IMMEDIATE MODE, TES 


01242 
01236 


oo 


1§: ERROR 
BR 
MERRO: MOV 
MOV 
SUB 
ASL 
SuB 
MOV 
MOV 
1$: ERROR 
MERR1: 
MOV 
MOV 
MOV 
1$: ERROR 
BR 
; TRAP TO HERE 
MERRS: BIT 
JMP 
1§: MOV 
MOV 
MOV 
CMP 
2$: ERROR 
BR 
MPAT10: .WORD 
MPAT11: .WORD 
MPAT12: .WORD 
MPAT15: .WORD 
MPAT20: .WORD 
MPAT21: .WORD 
MPAT22: .WORD 
MPAT23: .WORD 
MDATOO: .WORD 
MDATO1: .WORD 
MDATO ~ WORD 
MDATO WORD 
MDONE : 
RSETUP 


THR 


H 7 
: 08:47 PAGE 39-1 


+63 
MDONE 


,STMP3 
#15 .STMP 2 
+64 
MDONE 


#M15,STMP2 
#MDATOO,$T 


ATOU, 
#MPAT20 ,STMP4 
+66 


OUGH 4. 
#1, (SP) 

1$ 

CPSPUR 
(SP) ,STMP3 
#M2 ,STMPS 


#mi5,$TMP2 
(SP)+, (SP)+ 
+65 


MDONE 


SEQUENCE 


sREPORT FAILURE 
:PC INCREMENTED 


sREPORT DATA 
s FAILURE 


;SEE IF THE 
;TRAP TO 4 OCCURRED 
; F AN 


GENERATED 


:GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOFTWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


85 
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"EST @ 20 = FSAC MODE © TET 


mm rr a cc 
’ 


6020 .SBTTL TEST # 20 - FSRC MODE 3 TEST 
fF SAMA AaNeeaAAeeeaaaereeeeeeeeaeagagraengaaengeeeegaaearhinagaagenarageaee 
-*TEST 20 FSRC MODE 3 TEST 
-* 
>* THIS IS A TEST OF FSRC MODE 3, AUTO INCREMENT 
= DEFERRED 
-* 
PUT IT ITI iti i tits ii iii itiiiitiititiliiiiiiiiiiiiitiiii titty 
pee 020362 099006 TST20: SCOPE 
4022 0 N1: 
8 igre 170011 SETD :SET FD MODE 
40 5 020366 012700 021046 MOV #NPAT10,RO 
4 ¢ 0 172410 LDD (RO) ,ACO :LOAD ACO WITH A DEFAULT 
40 :PATTERN 
40 0 0374 0127 021034 MOV #NPAT20,RO 
40 00 90 CLR R 
“9 020402 012737 020556 000004 MOV WNERRO,ERRVECT :IF A FAILURE OCCURS 
4031 -IN THE FSRC FLOWS AN 
40 ‘ODD TRAP TO 4 COULD OCCUR 
4033 020410 172430 N2: LDD a(RO)+,ACO -TEST INSTRUCTION. 
4034 020412 00320 N3: INC R3 
40 § 020414 005203 NG: INC R3 
4037 020416 012701 021014 MOV #NDATOO,R1 
4038 020422 174011 STD ACO, (R1) :GET THE DATA 
4040 020424 020027 021036 CMP RO. ANPAT20+2 zWAS RO INCREMENTED 
4041 0204 1437 BEO N12 “BY 2? 
4043 020432 020027 021044 NS: CMP RO,ANPAT20+10 ;FSRC MODE 2? 
4044 0 04 56 001001 BNE 
4045 40 000506 BR NERR1 
100? 020442 020027 021024 N6: CMP RO.ANPAT20-10 :FSRC MODE 4? 
4068 0 0446 001001 BNE N7 
4063 0450 000520 BR NERR2 
108) 020452 020027 021034 N7: CMP RO. ANPAT20 
035 020456 001023 BNE N11 
4054 020460 012702 021014 MO\ #NDATOO,R2 :FSRC MODE 0? 
4055 1270 000004 MOV #4 R 
4 36 0 022227 177777 NB: C (R2)+,#=1 
2088 990276 077304 oo ORSNB 
4089 0 $00 000510 BR NERR3 
4061 $02 012702 021014 NO: MOV #NDATOO,R2 :FSRC MODE 1 
4 306 01 708 satay MOV A#NPAT20,R3 
4 512 012704 000004 MOV #4 RG 
4 516 0 283 N10: CMP (RO) +, (R3)+ 
4065 0205 1 ; BNE N11 
4066 522 740 SOB R4,N10 
4067 $24 000502 BR NERR4 


me ee eC ee a eee ee 


CKEPADO FRIIF FLTG PNT PRT A 
TEST #@ 20 = FSRC MODE © TEST 


4069 020526 


o076 5 

4077 02055 
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8 576 
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333333 
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020412 


042566 
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042566 


001236 


J 7? 
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NERRS5 


#NDATOO,R2 
SPAT IC .RS 


#4,R 

(R2)+, (R3)+ 
N14 

R4.N13 
NDONE 


NERR6 


SEQUENCE 


DATA CORRECT? 


:1F AN ODD ADDRESS TRAP OCCURS COME HERE 


N11: BR 
N12: MOV 
MOV 
MOV 
N13: CMP 
BNE 
$08 
BR 
N14: BR 
NERRO: CMP 
BEQ 
CMP 
BEQ 
JMP 
1$: CMP 
BEQ 
JMP 
NERRIO: 
MOV 
CMP 
1§: ERROR 
BR 
NERR11: MOV 
CMP 
001244 MOV 
001250 MOV 
001246 MOV 
1$: tan 
001246 NERR1: MOV 
001244 NERR20: MOV 
001250 MOV 
001236 MOV 
18: aaa 
001246 NERR2: = 
001246 NERRS: “id 
001246 NERR4: MOV 
BR 
NERRS: MOV 
001242 MOV 
001236 MOV 
1$: ERROR 
BR 


CPSPUR 
RO ,ANPAT20-2 
NERR11 


CPSPUR 

(SP) ,STMP2 

(SP)+, (SP)+ 

+67 

NDONE 

(SP) ,STMP2 
TMP 

#323,STMP7 

#325, STMP6 

+70 

NDONE 

#3 ¢.$TMPG 

#627,$TMPS 

#323, S1MP7 

#N2, $TMP2 

+71 

NDONE 

#324, STMP6 

W500 STMP6 

#321. $TMP6 

NERR2O 

RO, STMP3 

#NPAT20 

4#N2,$TMP 

7 

NDONE 


a 


;TO SEE IF THE FAILURE WAS IN THE FSRC 
; FLOWS 


sFSRC MODE 6 OR 7? 


sFSRC MODE 5? 


sWENT TO FSRC 
sMODE 6 OR 7. 


> WENT 
> MODE 


TO FSRC 
Se 


sFSRC MODE 2. 


sFSRC MODE 4 
sFSRC MODE 0 
sFSRC MODE 1 


;RO NOT 
; INCREMENTED 
:PROPERLY. 


87 


s. 
‘KFRADO FRIIF FLIG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 40-2 SFQUENCE 88 
TEST #@ 20 = FSRC MODE 3 TEST 


4126 020766 NERRG: :DATA FAILURE. 
4127 0 766 012737 020410 001236 MOV #N2,STMP2 
4128 020774 012737 921014 001260 MOV #NDATOO, $TMP3 
41 1 012737 021056 001242 MOV #NDATIO.$STMP4 
41 1 104073 1$: ERROR +73 
41 ; 1012 000425 BR NDONE 
41 1014 NDATOO: .WORD 0 
ce aig ensgg Suet: ge 
4135 0210 0 NDATO3 “WORD 0 
41 1 052525 052525 NDATO3: .WORD  0,52525,52525,52525,52525 
41 1 6 NPAT20: .WORD NDATIO 
41 1 0 NPAT21: .WORD 070707 
4139 021 070707 NPAT22: .WORD 070707 
4140 021042 070707 000001 NPAT23: .WORD 070707,1 
4141 1066 177777 NPAT10: .WORD <1 
414g 1050 177777 NPAT11: .WORD <1 
4143 021052 177777 NPAT12: .WORD -1 
166 021054 177777 NPAT13: .WORD -1 
4146 021056 010421 NDATIO: .WORD 010421 
414 0 1060 02104 NDATI1: .WORD 1042 
4148 021062 03146 NDATI2: .WORD 031463 
6149 021064 042104 NDATI3: .WORD 042104 
4151 021066 NDONE : 
021066 104413 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


:SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOFTWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


“KERPADO FPTIF FLTG PNT PRT A 
TEST @ 2° = FSAC MODE S TEST 


4766 
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000004 


SBTTL 
[eTEST 21 


;* DeF 


TEST # 21 = FSRC MODE 5 TEST 


“*SSSSSeReeeRESTeAeeeeeaeeaekeaaeeaaeaeeaaeeeteeitaeeeeeeeetaeane 


FSRC MODE 5 TEST 


* THIS IS A TEST OF FSRC MODE 5, AUTO DECREMENT 
ERRED. 


**SRRARAEERAAAARAREEASRERATAAEAREKRAAAARERKRARARHARHEEARERHREAKRAREAHEEE EEE 


1$121: 
01: 


02: 
04: 


05: 


06: 


07: 


08: 


09: 


010: 


SCOPE 


SETD 


MOV #OPAT10.R0 
LDD (RO) ,ACO 


MOV #OPAT21,R0 
MOV #OERRO,ERRVEC 


LDD a-(RO),ACO 
R3 


INC R3 

MOV #ODATOO,R1 
STD ACO, (R1) 
CMP RO, #OPAT20 
BEO 012 


CMP RO,AOPAT21+10 


BR OERR1 

CMP RO, #OPAT21-10 
BNE 

BR OERR2 


CMP RO. #OPAT21 
MO\ #ODATO1,R2 
| #4_R3 
CMP (R2)+,#=1 
09 


SOB R3,08 
BR OERRS 


MOV #ODATOO,R2 
MOV #OPAT21,R3 
#4 R4 


CMP (R2)+, (R3)+ 
017 


SOB R4,010 
BR OERR4 


ee es ee a eee 


:SET FD MODE 


sLOAD ACO WITH A 
;DEFAULT PATTERN. 


:IF A FAILURE 

sOCCURS IN THE FSRC 
sFLOWS AN ODD ADDR. 

: TRAP TO 4 MAY OCCUR. 
sTEST INSTRUCTION 


;GET THE DATA 


zWAS RO DECREMENTED 
:BY 2? 


sFSRC MODE 2 


sFSRC MODE 4? 


sFSRC MODE 0? 


sFSRC MODE 1? 


SEQUENCE 


89 


"mEPADO FPIIE FLIG PNT PRT A 
MODE } 


4209 021232 
4210 

4211 021234 
621 1260 
421 1264 
4214 021250 
4215 021252 
4 16 021254 
4217 021256 
4 18 

4219 021260 
4220 

2 H 

2558 
4224 

: 5 62 
1559 051590 
4 1274 
4 1276 
4 1302 
4231 021 

4 4 02131 
4 

4 % 021314 
4235 021314 
4236 0 1% 0 
4237 st 2 
4238 021324 
4239 

4240 0213 § 
4241 0213 

4 rk 13 
424 1 308 
4244 ee 
4245 021356 
4 6 021360 
2528 021 
1549 091390 
4250 021376 
4251 021404 
4 26 1412 
425 1414 
4254 021416 
i335 Ss 
2589 Oot4 
4258 021436 
4259 021444 
4260 

4261 02144 
4 145 
ise Bt 
4265 1296 





TEST #@ 21 = FSRC 
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S TEST 


021122 
021120 


042566 
021542 


042566 


001236 


001240: 


000627 
000325 
000323 
0003 

000639 
000325 
021116 


000324 


O91 40 
021122 
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011: 
O12: 


013: 


014: 


OERRS 


#QDATOO,R2 
eee te As 


#4 R 
(R2)+, (R3)+ 
014 


R4,013 
ODONE 


OERRG 


SEQUENCE 


DATA CORRECT? 


;1F AN ODD ADDRESS TRAP OCCURS COME 
sHERE TO SEE IF THE FAILURE WAS IN THE 


sFSRC FLOWS: 
OERRO: CMP 
BEQ 
CMP 
BEQ 
JMP 
1$: CMP 
BEQ 
JMP 
OERRIO: 
MOV 
CMP 
1$: ERROR 
BR 
OERR11: MOV 
CMP 
MOV 
MOV 
MOV 
1$: ERROR 
BR 
OERR1: MOV 
OERR20: MOV 
MOV 
MO\ 
1$: ERROR 
BR 
OERR2: MOV 
BR 
OERR3S: MOV 
BR 
OERR4: MOV 
BR 
OERRS: MOV 
MOV 
MOV 
18: ERROR 


#04, (SP) 
OERR10 
#03, (SP) 
1$ 


CPSPUR 
RO, AOPAT21+2 
OERR1 


CPSPUR 


(SP) ,STMP2 
(SP)+,(SP)+ 
+74 


ODONE 
(See 


#322, $TMP6 
#627, $TMP4 
#325.$1MP7 
#02, $TMP2 
+76 


ODONE 

#324 ,STMP6 
RR20 

brs STMP6 


#321, $TMP6 
GERR20 


sFSRC MODE 6 OR 7? 


sFSRC MODE 3? 


sWENT TO FSRC 
MODE 6 OR 7 


id TO FSRC MODE 


sFSRC MODE2 


sFSRC MODE 4 
sFSRC MODE 0 
sFSRC MODE 1 


RO NOT DECREMENTED 
; PROPERLY 


CaFPADO FRIIF FLTG PNT PRT A 
i TEST # 21 = FSRC MODE S TEST 
/ 4 
$388 oorare 
e568 031805 BIST? 931338 
4 % 1306 12737 156 
4271 021514 106106 
6 re 1516 0004 
«437% 0215 9 000000 
4275 0215 090000 
276 021524 
| @2yr 0 1526 052525 
| 4278 0215 1562 
4279 021540 070707 
£380 021542 070707 
428: 021544 070707 
4 4 0 1366 070707 000001 
4283 021552 17777 
4 3 021554 177777 
4285 021556 177777 
4286 021560 177777 
£388 021562 073567 
4 021564 004210 
4290 0 1366 114631 
4291 021570 125252 
4 32 
429 021572 
021572 104413 


a ——————_— a ee | ee ee ee 
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001 
001340 
001242 


052525 


OERRE: 


ODATI3: . 


ODONE : 


me ae eee ee 2 


SEQUENCE 91 


sDATA FAILURE 
#02,.$TMP2 
#ODATOO,STMP3 
—- 


+ 
ODONE 


5,52525,52°25 


125252 


:GC INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
: THE USER TYPED CONTROL G?). 


8 8 
“EERPADO FRITE BLIG PNT PR- A MACRO M1113 20-OCT-81 08:47 PAGE 42 SEQUENCE 92 
TEST #@ 22 = FSRC MODE € TEST 
430! -SBTTL TEST # 22 - FSRi MODE 6 TEST 
- = MORE RRERREREREREREKEREHRERERERAAHRRERRERRRERERER ARE RARER R EEE 


S*TEST 22 FSRC MODE 6 TEST 

-* 

+e THIS IS A TEST OF FSRC MODE 6. INDEX MODE 
-* 






: 021576 000004 1$122: SCOPE 

4 g 1576 Pl: 

4 1576 170011 SETD :SET FD MODE 

4 021600 012700 022216 MOV #PPAT10.RO 

é 021604 172610 LDD (RO) ACO : LOAD A DEFAULT PATTERN 
4309 021606 012737 021714 000004 MOV #PERRO,ERRVECT :IF THE (BUT FSRC) FORO 
4310 “FAILS AN ODD ADDRESS TRAP 
é 1 021614 012700 021765 MOV #PDATI0=241,R0 :COULD OCCUR. 

4 8 021620 172460 000241 pe: LDD 241(RO) ACO 

‘ 16 021622 P3=P2+2 

4 1 021624 012701 022236 P4: MOV #PDATOO,R1 

431 0 16 : 174011 STD ACO, (R1) :GET THE DATA 

4318 021632 012703 000004 MOV #4,R3 

4319 021636 01270 022226 MOV #PDATIO,R2 

4320 021642 012701 022 MOV #PDATOO.R1 

7 1 1656 001007 PS: & alae :CHECK THE DATA 

4 5 § 165 7308 SOB R3,P5 

4324 0 1654 022700 021765 CMP #PDATI0-241,R0 :=RO CORRECT? 

4325 1660 1401 BEQ 1$ 

4 ; 02166 512 BR PERR21 

é Z 021664 137 022246 1$: JMP PDONE 

4 1670 012701 022236 P6: MOV #PDATOO,.R1 

4 1674 012703 MOV #4,R3 

4 1700 02 rel 177777 P?: CMP #-7,(R1)+ :WAS IT FSRC MODE 0? 

4 17 1401 BEQ P8 

4 1 000 12 BR PERRI 

4 1710 077305 P8: $08 R3.P7 

4 1712 000523 BR PERR2 

4 - TRAP TO HERE ON AN ODD ADDRESS 

4 1714 1627 021622 PERRO: CMP (SP) #P3 

4 17 1411 BEO PERR 

Ps 1722 1627 021624 CMP (SP). #P4 :WwAS IT FSRC MODE 7? 
4340 0217 14 é BEO PERRIO 

‘ 1 0217 137 042566 JMP CPSPUR 

é 1734 1 737 000327 001246 PERRI0: MOV #327 TMP6 

é 5 1764 ie 021765 PERR11: COP #PDAT 10-241 ,20 :WAS IT FSRC MODE 1 

4 3 175 i277 000321 001246 mov 8 21 STMPG 

4 3 17 700 021775 PERR12: CMP #PDATIO-241+10,RO :WAS IT FSRC MODE 2 
4350 021766 001004 BNE PERR1 


NANI wi 


NO 


MIOMIMINMIPININNY 


4351 021770 
cReg 1776 
435 

4 

cas 

4 146 
ie sous 
£359 0 é 
2300 8556 
4 02204 
4 02204 
4 022044 
2366 02205 
ce 
i368 50 
4370 074 
4371 022076 
437 

4373 0 

4374 0 

75 

7 

7 
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rornoenorons 
ee yo Oh ah ot eh oh wh 
% SKSkK¥ OSNseasRRS 


Aonror 


ee ee ee ee ee ee ee ee ee ee ee ee ee et et ee et et ee et ek ee 
™~ 


QFSRAEVLSSSLESSRELS 
RNIN MMMM NN 
FNSS RSS Rw 


RREREEES 


012737 


-—OOoo 
WOWWW 
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—OOoooe 
FuUnnwnn 
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™N 
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‘aSPADO FRTIE ELTG PNT PRT A 
TES’ @ 22 = FSRAC MODE 6 TEST 


060322 
921767 
000323 
021755 
000324 
021763 


000325 
000627 
000326 
0012 

001236 
021620 


001240 
021765 


021620 
O¢es66 
0222 
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001246 


001246 


001246 


001246 


001244 
001250 


MOV 


BR 
PERR13: CMP 
BNE 
MOV 
BR 
PERR14: CMP 
BNE 
MOV 
BR 
PERR15: CMP 
BEQ 
BR 
PERR16: MOV 
PERR17: MOV 
MOV 
MOV 
CMP 
1§: ERROR 
BR 
PERR20: MOV 
CMP 
BR 
PERR21: MOV 
PERR22: 
MOV 
MOV 
1§: ERROR 
BR 
PERR1: 
MOV 
MOV 
MOV 
1$: ERROR 
PERR2: 
MOV 
MOV 
MO\ 
MOV 
1$: ERROR 
BR 
PPAT10: .WORD 
PPAT11: .WORD 
PPAT12: .WORD 
PPAT13: .WORD 
PDATIO: .WORD 
PDATI1: .WORD 
PDATI2: .WORD 
PDATI3: .WORD 


#322 ,.STMP6 


PERR 
#PDAT10=-241+2,R0 sWAS IT FSRC MODE 3 


#323 ,.STMP6 


PERR 
#PDAT1I0-241-10,R0 sWAS IT FSRC MODE 4 


#326, STMP6 
17 


PERR 
ears ee We AS sWAS IT FSRC MODE 5 


PERR 

A trys 

#325 ,.STMP6 
re UG te: 
#326,STMP7 
(SP) .STMP2 
(SP)+, (SP)+ 
+101 

PDONE 


(SP) ,STMP2 
(SP)+, (SP)+ 


PERR2 
#P2,$TMP2 


;REPORT FSRC 
sFLOWS FAILURE. 


;REPORT RO AFFECTED 


RO. STMP3S 
#PDAT10-241,$TMP4 
+102 
PDONE 
:DATA FAILURE. 

#P2,$TMP 
#PDATIO, STMP3 
#PDATOO, STMP4 
+104 
PDONE 

sFSRC FAILURE TO 
TMP2 sMODE 0 


#P2.$ 
#627,$TMPS 
# o6:$1hP? 


“KFRADO FRTTIF FLIG PNT PRT A 
TEST # 22 = FSRC MODE € TEST 





104413 


D 
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-WORD 0 
. WORD 0 
-WORD 0 
-WORD 0 
RSETUP 


“THE DESIRE TO CHANGE THE 
6? 


SEQUENCE 9% 


:GO INITIALIZE THE FPS AND STA 
:SEE IF THE USER HAS EXPRESSED 
TWARE 
>VIRTUAL CONSOLE SWITCH TER (HAS 


Is 
:THE USER TYPED CONTROL . 


ae 


4422 


022250 
6656 02225 
68s 082850 
<c58 028260 


44 022262 


4434 022270 
4435 

4436 022274 
oo 


ai 

4 
coe 069812 
4444 16 
4445 é 
a9 ‘ 
4447 022326 
448 
4449 022330 
4450 $0 


+of oO 


wu 


“cFPADO FRITE FLTG PNT 
TEST #@ 23 = FSRC MODE 


079006 
170011 
BE HA 
172410 


012737 


oo 
—_— 


Sonn 
8s 


S 


Coo — 


ooo 
—~— = 
&—NwWwn— Ww 


—POMONIN 


eS S 
orm 


Seon 
2 


PR” A 
7? TEST 


022706 


022414 


022455 
000241 


022726 


E 8 
MACRO M1113 20-OCT-81 08:47 PAGE 43 


000004 


SE QUE NCE 


-SBTTL TEST # 23 = FSRC MODE 7 TEST 


“MRSS teeeeeeeaeeeseseeaeeeeeeaaeeeeeaeeeeeaeeeeeeianteeeeareeeeee 


[eTEST 23 FSRC MODE 7 TEST 


-* 

:* THIS IS A TEST OF FSRC MODE 7, INDEX 
:* DEFERRED MODE. 

-* 


’ 
“SRR ARF eae Raketaaeteeeneneaeeeaeeteeteeaeeeee 


1$723: SCOPE 
Q1: 
SETD 
MOV #QPAT10,RO 
LDD (RO) ,ACO :LOAD A DEFAULT 
“PATTERN INTO ACO 
MOV WOERRO,ERRVECT ;IF THE (BUT FSRC) 
*FORK FAILS 
“ODD ADR TRAP COULD 
MOV WOPAT20-241,R0 
02: LDD @241(RO),ACO 
Q3=02+2 
04: MOV #QDATOO,R1 
STD ACO, (R1) :GET THE DATA 
MOV R3 
MOV ATOO,R4 
MOV #ODATIO.RS 
Q5: CMP (R4)+, (R5)+ :CHECK THE DATA 
BNE Q 
SOB R3,05 
CMP #OPAT20=241.RO :CHECK RO. 
BEQ 1$ 
BR QERR21 
1$: JMP QDONE 
06: MOV #QDATOO,R1 
Q7: CMF #-7,(R1)+ :WAS IT FSRC MODE 0? 
BNE Q 
S08 R3,07 
BR QERR2 
08: MOV #OPAT20,R1 
MOV #ODATOO,R2 
MOV a6 
09: CMP (R1)+,(R2)+ :WAS IT FSRC 6 
BEQ Q10 *OR DATA FAILURE 
BR QERR1 
Q10: SOB ,a9 
BR QERR3 


95 


F 8 
“KF PADO FRTIF FLIG PNT PRT A MACRO #1113 20-OCT-81 08:47 PAGE 43-1 SEQUENCE 96 
TEST # 23 = FSRC MODE 7 TEST 


4471 
4472 022614 oe 7 Q21022 QERRO: CMP (SP), #P3 
rent 0224620 137 962566 JMP CPSPUR 
46475 022424 022700 022655 QERR11: CMP #QPAT20-241,R0 ;:WAS IT FSRC 
667 4 BNE QERRI “MODE 1? 
447 4 12737 000321 001246 MOV #321, STMPG 
447 BR QERRI?7 
44 44 022 022465 QERR12: CMP oe te sWAS IT FSRC 
bol 31004 BNE QERR1 :MODE 2? 
4481 0226 12737 000322 001246 MOV #322, $TMP6 
ws 4 35 BR QERRI7 
4 700 022457 QERR13: CMP #OPAT20-241+2,R0 :WAS IT FSRC 
4484 022664 1004 BNE QERR14 :MODE 3? 
4485 : 466 12737 000323 001246 MOV #323, STMP6 
44 474 000416 BR RRI7 
bb 476 022700 022445 QERR14: CMP #OPAT20-241-10,R0 :WAS IT FSRC 
44 50 1 BNE QERR15 sMODE 4 
bl 504 012737 000324 001246 MOV #324, STMP6 
4490 $12 000407 BR QERR17 
449¢ 022514 022700 022453 QERR15: CMP #OPAT20-241-2,R0 :WAS IT FSRC 
46493 0 320 001401 BEQ QERR16 :MODE 5 
022522 000416 BR QERR20 
4696 022524 012737 000325 001246 QERRI6: MOV #325. STMP6 
4498 022532 012737 000627 001244 QERR17: MOV a6 7,.$TMP5 :REPORT FSRC FAILURE 
4499 022540 012737 000327 001250 MOV #327,$TMP7 
45 0 546 011637 0012 MOV (SP) ,STMP2 
4501 552 022626 CMP (SP)+, (SP) + 
45 ; 0 554 104105 1$: ERROR +105 
430 556 000473 BR QDONE 
taps 022560 011637 001236 QERR20: MOV (SP) ,STMP2 :REPORT RO AFFECTED. 
4506 564 022626 CMP (SP)+, (SP) 
45 366 03 BR QERR2 
+308 570 012737 022274 001236 Q@ERR21: MOV #02, $TMP2 
4509 022576 QERR22: 
4510 022576 010037 001240 MOV RO, STMP3 
4511 022602 012737 022455 001242 MOV #OPAT 20-241, STMP4 
4518 61 106106 1$: ERROR +106 
4313 612 00045 BR QDONE 
i318 614 012737 000320 001246 QERR2: mov #320, STMP6 :WENT TO FSRC 
4819 624 o00% ; 000326 001246 QERR3: MOV #326, $TMP6 : WENT To F SRC 
ta19 os 012737 7 001244 QERR4: MOV A la " 
45 640 012737 000 7 001250 MOV #327.$TMP7 
4521 6 012737 022274 001236 MOV #02 $TMP2 
45 ‘ 654 104107 1$: ERROR +107 
63 ; 656 000433 BR QDONE 
4525 0 QERR1: :DATA FAILURE 
45 0 660 012737 022274 001236 MOV #02,$TMP2 
4527 02 012737 022736 001240 MOV WODATIO, $TMP3 


G 
“eFPADO FRIIF FLTG PNT , test MACRO M1113 20-OCT-81 08:47 PAGE 3.5 SEQUENCE 97 


TEST #@ 23 = FSRC MODE 7 


OE ET TEE EE EEE Tt ETT TTT TT A SRT i 


45 012737 022726 001242 #QDATOO,.STMP4 
45 039703 104110 ERROR +110 
ye 0 000420 QDONE 
¢3 0 177777 QPAT10: .WORD -1 
45 710 177777 QPAT71: .wORD -1 
45 ae 177777 QPAT12: .WORD <1 
43 § 022714 177777 QPAT13: .WORD -1 
45 0 716 0? 736 QPAa20 .WORD QDATIO 
45 ? 525 QPAT21: .WORD 52525 
45 8 7 52525 at lf . WORD 25282 
rt 7 724 052525 QPAT23: .WORD 52525 
4942 0 726 000000 AT WORD 0 
454 ? 000000 QDATO1: .WORD 0 
4544 0 732 000000 QDATO2: .WORD 0 
rh oF 7 000000 QDATO3: .WORD 0 
tee9 022736 073567 QDATIO: .WORD 073567 
rere 022740 052525 et BE -WORD 052525 
4549 02274 031465 QDATI2: .WORD 031463 
ri Ts 022744 0104621 QDATI -WORD 010421 
4552 033706 QDONE : 

022746 104413 RSETUP :GO INITIALIZE THE FPS AND STACK: AND 


4553 


7SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?) 


4570 

75 
ry BE 
rege 0 728 
4573 02276 
4574 0 786 
a 
1859 022774 
4578 03 2 
4579 023010 
4580 023016 
4581 ; 3006 
coat 0 3030 
ig: Ses 
ret 5 023046 
re 023054 
io Suis 
4591 0230 
+238 023074 
459 


35 ie 
cans 

i, oi 
2399 0 3114 
a SIE 
88 $8 
4604 

4605 Og 126 
606 023140 


= 
NNN 
So 
™N 


Naat aes ot 
SNUCUNNN OS NN 
ge WWW eo ee 

N NNN WO 


23 dddeds 
S$ Mvisss 
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Www 
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-—Oo& ooOo-0o FCoOo-0o-00 Coo GoOooe 
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on 


~~ 


“eERADO FPTTIF ELTG ENT PRT A 
TEST @ 24 =- (BUT EZBY vB), BuT ENBT) AND (BuT Fluv) TEST 


000033 
star 
023554 
023024 
000200 
024024 
gen0re 
000254 
024034 
001252 
025066 


000204 


023600 


023126 
000200 


024024 
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024076 


001236 


001710 


SEQUENCE 


-SBTTL TEST # 246 - (BUT EZBT Y8), (BUT ENBT) AND (BuT Fluv) TEST 


**S9 ORR eEReeeeeaeeeeeeeeeeetaeeaeeeaeaenaeaneeeeaeeeaaneaaketeeeaee 


SeTEST 26 


;* (BUT E 


NBT) 


(BUT EZBT Y8),(BUT ENBT) AND (BuT Fluv) TEST 
-* 
;* THIS IS A TEST OF THE (BUT EZBT Y&) FORK, THE 


;* LOAD INSTRUCTION FLOWS. 


7 | . 
we: @gaeeenereneneanee 


124: 


os 


Cc 
© 


Ul: 
1$: 


U2: 


U3: 


se | 

;* WITH AC=0. 
HECK TO INSURE THAT CONTROL WAS PASSED 
;* THROUGH WITH THE FORKS PROPERLY. 


'WeeAARRRERARARARALASLALSAERLAAARARRRARRRRER RRR RRRRR SERS SERRE RR RR ARES ES SC | 


;* EACH OF THE + ieee 


+NUM 
-NUM 


FORK AND (BUT FIUV) FORK IN THE 


-0 
S LOADED TWICE, ONCE WITH AC>0O THEN 


AFTER EACH LOAD THE FPS IS 


UF LAG 
#UPATOO,RO 
#4,R1 
#-1,(RO)+ 
R1,U0 


#033,UTMP1 
#023, UTMP2 


#MUERRO ,FPVECT 


#1$,SLPERR 


206,R0 


#001, 
#254,UROM 
#UPAT10.RO 
(RO) ,ACO 
RO, $TMP10 
#2, $TMP2 


al 


R4,R5 
u3 
UERR1 


#1$,SLPERR 
#200.RO 


#UPATOO, RO 
(RO) ,ACO 


7SET UP AC#0 DATA. 


7IN CASE (BUT FIUV FAILS) 
:SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD ACO 


;LOAD 0 INTO ACO 


;SEE IF FPS IS CORRECT 


:SET UP THE LOOP ON ERROR ADDRESS. 


:LOAD ACO 


98 


ee ee ae ae 








3 1 
: 
16 
$e 
9 Bs 
1 
; Baas 
6 
54 
464 
4648 74 
4649 7 
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FMRIOOM 


SESSSSSESESS 
EE RBRLALA ROD 
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CKFPADO FPITIF FLTG PNT PRT A 
TEST # 24 = (BUT EZBT v8), BuT E 


4607 09815 
1§ 
156 


0241 
a6s008 
926044 


001936 
02317 
000200 


023664 
023230 
000200 


MACRO 
NBT) 

024102 
024104 
024106 
001236 


001110 


001236 


001110 


001236 


us: 
18: 


U7: 


Ul2: 


u10: 


I 8 
M1113 20-OCT-81 08:47 PAGE 44-1 
AND (BUT Fluv) TEST 


UTMP2 ,UROM1 
3,,UROM 

#054 ,UROM 

#UPAT20,R0 


(RO) ,ACO 
RO, STMP10 
#U4 ,STMP2 


TMP 
#200,.Ré 
R 
R4,R5 
U 
UERR2 
#1$,.SLPERR 


#200,R0 
RO 





atte a 
#UPAT30,RO 
(RO) ,ACO 
RO,STMP10 
#U6 , STMP2 
#210,R4 

RS 

R4,R5 

U7 

UERR2 


#1$,SLPERR 


#200,R0 
RO 





#UPAT4O,RO 
(RO) ACO 


RO. $TMP10 
#U10,$TMP2 





SEQUENCE 


sLOAD A POSITIVE NUMBER 
: INTO ACO 


3FPS CORRECT? 


;SE7 UP THE LOOP ON ERROR ADDRESS. 
;LOAD ACO 


sLOAD A NEGATIUE 
;NUMBER INTO ALO 


FPS CORRECT 


:SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD ACO 


LOAD -0 INTO ACO 
; TRAP FROM HERE IF 


; (BUT FIUV) FAULS! 
;SEE IF FPS IS CORRECT. 


;SEE_IF ALL THE PATTERNS 
sHAVE BEEN TEST WITH 
;BOTH AC NOT EQUAL TO 0 AND AC=0 


;1F NOT GO BACK 
CHECK THEM WITH AC=0 


CKFPADO FPTIF FLTG PNT PRT A 


TEST # 24 = (But EZBT V8), 


: 


gaeEES 


MRAAIWA FU 


SESSNSEE SSR 
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SEES 
Oooooooo0o oO 
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177777 
00023 


900835 


023506 
023750 
004200 
024024 
024064 


023534 


023376 


042534 
001236 
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‘But ENBT) AND 


001110 
000244 


001236 


001244 


001244 


(But Fluv) TEST 
u13: CLR 


U146: 

MOV 
sNOW SEE IF A 
1$: 


u15: LDD 
U16: CFCC 
NOP 


1§: ERROR 
BR 


z TRAPPED TO 244. 
UERRO: CMP 


1$: MOV 
2$: ERROR 
BR 


#223 ,UTMP2 
ul 


#1$, 


rs gee R3,F 
#4200.R0. 


#UPAT4O.RO 
(RO) ACO 


#U15 ,$TMP2 


+127 
UDONE 


-. wy’ FIUV) 
(SP) ,#U11 
1$ 

FPSPUR 
(SP) ,$T 


MP2 
(SP)+, (SP)+ 
+126 


:COME HERE TO ANALYZE FPS ERRORS 


UERR1: BIT 
BE 

UERR10: MOV 
MO 


1$: BIS 
2$: 

VERR11: MOV 
1$: ERROR 
UERR2: BIT 
UERR20: MOV 


#6 ,R5 
UERR20 
#443, $TMP5 
UROMS ,.R3 
R3 sTAp7 


#400,R3 


SEQUENCE 100 


THE LOOP ON ERROR ADDRESS. 


SLPERR 3SET uP 
TRAP CAN BE E FORCED: BY SETTING FIUV AND LOADING -0 
sSET FD AND FluV 
;SET UP ACO 


;LOAD -0 
:SHOULD TRAP TO 244 


sREPORT ERROR. 
;DIDN'T TRAP 
; (BUT FIUV) FAILED. 


FAIL? 


K 
“KFPADO FRIIF FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE ‘8 SEQUENCE 101 
TEST #@ 24 = (BUT EZBI v8), Bul ENBT) AND (BuT Fluv) TEST 


eae 8 722 BR 2 

471 726 703 000400 1$: BIS #400,R3 

4? ? 1 3 901246 2$: MOV R3,STMP6 

4721 7 10537 0012460 UERR21: MOV RS. STMP3 

47 740 010437 001242 MOV RL. $TMPS 

4? 7u4 106125 1$: ERROR +125 

67 4 766 60 BR UDONE 

47 : : INTERRUPT HERE WHEN FIUV SET AND ATTEMPTED TO LOAD-0 
4727 023750 021627 023536 UERR3: CMP (SP) ,#U16 

4728 023754 0014 EQ 

47 7 042534 JMP FPSPUR 

47 7% 1$: CMP (SP) +, (SP)+ 

4731 023764 CLR RO 

4? ; 766 170 STST RO :GET FEC. 
47 770 022700 000014 CMP #14,R0 CORRECT 
47 77% 901001 BNE UERRS 

4735 02377 44 BR UDONE 

47 4 012737 023534 001236 UERR4: MOV #U15,$TMP2 

47 4 012737 000012 001242 MOV #12,$TMP4 

47 4014 01 37 001240 MOV 0, $TMP3 

4739 02460 9 104130 1$: ERROR +130 

4740 0240 000432 BR UDONE 

4741 0 4024 000000 UPATOO: .WORD 0 

4742 024026 000000 UPATO1: .WORD 0 

4743 0240 UPATO2: .WORD 0 

4744 024032 000000 UPATO3: .WORD 0 

4746 0 4034 000000 UPAT10: .WORD 0 :0 

4747 024036 000000 UPAT11: .WORD 0 

474 0 4040 UPAT12: .WORD 0 

4749 4042 000000 UPAT13: .WORD 0 

4751 024044 010421 UPAT20: .WORD 010421 :POS NUM 
4752 4046 114631 UPAT21: .WORD 114631 

475 4050 125252 UPAT22: .WORD 125252 

4734 4052 177777 UPAT23: .WORD 177777 

4756 024054 114631 UPAT30: .WORD 114631 :NEG NUM 
475 0 4056 135673 UPAT31: .WORD 135673 

4758 024060 146314 UPAT32: .WORD 146514 

4799 024062 167356 UPAT33: .WORD 167356 

4761 024064 100000 UPAT4O: .WORD 100000 sNEG ZERO 
rh rts» 000000 UPAT41: a 

4763 024070 UPAT42: .WORD 0 

4764 4072 UPAT43: .WORD 0 

4766 024074 000000 UFLAG: .WORD 0 

476 mts 000000 UTMP1 WORD 0 

2569 094102 000000 UROM: ‘uomD OO 

2590 O5410¢ 000000 UROM? | 

4771 024106 000000 UROM3 WORD 0 

477 4110 UDONE 
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4788 024134 
4789 024142 
4 024146 
4791 024150 
4792 024152 
4793 024154 
4794 024160 
4795 024162 
4 0 2193 
479 4172 
4798 024174 
4799 
4800 024176 
4802 026906 
4808 094910 
4804 024212 
pe 1 024216 
4807 024220 
4808 0 7 $ 
4809 024 
4810 8 és 
4811 024240 
024240 
4 1¢ 024 $8 
4813 02425 
4814 024254 
ibid Gocee® 
2819 4 5 
sng 4272 
4819 024274 
“ 4 
4821 024 
¢ 4 
4 
4 024312 
5 024314 
4 6 $0 
& 4324 
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024120 
000200 
024664 
024146 
024664 


024664 


024664 
000004 


024632 
024704 
000204 
001240 
024704 
024246 
000200 
024664 
024300 


024664 


024664 
024664 
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001110 


001236 


001242 


001110 


001236 


L 8 
1 08:47 PAGE 45 
ST 


SEQUENCE 


-SBTTL TEST # 25 = ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 


WEP ARRRRRRERRESLASLASLESAARARARRAERSLERLARRRARRRRRERRRRRASERRRR RES ESSERE SR & | 


ADDF ,ADDD,SUBF AND “UBD WITH FSRC=AC=0 TES’ 


S*TEST 25 


-* 
7* THIS IS A TEST OF ADD AND SUB WITH FSRC=AC=0 
-* 


fF EAA AAAARAAAARAAERARAARAAAAKAERAARAAAAAARERAAAERAAAAAHARAAKARARAE EEE 


TST25: 
Wi: 
1$: 


We: 


1$: 


W5: 
1$: 


W7: 


SCOPE 


#1$,SLPERR 


#200,R0 
0 


#wPATOO,RO 
ACO, (RO) 
#WPATOO,R1 
a4 
(RO) +, (R1)+ 
ws 

PC ,WSETUP 

os 


133 


#204, STMP4 
RS,STMP3 
+137 

WDONE 


_ #18, SLPERR 


#200,R0 
0 


#WPATOO,RO 
(RO) ACO 
#we, $TMP2 
RO 
#WPATOO,RO 
(RO) ACO 


#WPATOO,RO 
ACO, (RO) 
#WPATOO,R1 


#4,R 
(RO) +, (R1)¢ 


:SET UP THE LOOP ON ERROR ADDRESS. 


:SET DOUBLE MODE 
;LOAD ACO=: 


;TEST INSTRUCTION. 
:GET FPS 

:SET DOUBLE MODE 
;GET THE RESULT 


71S RESULT CORRECT 
:NO 


31S FPS CORRECT 
:NO 


:SET UP THE LOOP ON ERROR ADDRESS. 


:SET DOUBLE MODE 
;LOAD ACO=0 


:GO0 TO FLOATING MODE 
sTEST INSTRUCTION 
sGET FP 

sRESET TO DOUBLE MODE 
;GET THE RESULT 


;WAS THE RESULT 


102 


— ee 


SEQUENCE 103 





— 


4 1402 BEQ w10 :NO. REPORT FAILURE. 
4 Rt 1$: ERROR +134 
024 564 BR wDONE 
0 4 205 wi0: $08 R2,W7 
4 022 05 000004 CMP #6°RS :WAS FPS CORRECT 
024 1407 BEQ wii 
s INCORRECT FPS. 
2 4 012737 000004 001242 MOV #4, $TMPS 
4352 015537 001240 V R5.$TMP3 
024356 194140 1$: ERROR +140 
0 4 000551 a : WDONE 
8 4 012737 024370 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4840 024 012700 000200 1$: MOV #200,R0 
4841 024374 170100 LDFPS RO :SET DOUBLE MODE 
4 é 4376 012700 024664 MOV #WPATOO,RO “LOAD ACO=0 
484 4402 172610 LDD (RO) ,ACO 
4844 024404 012737 024416 001236 MOV #W12,$TMP2 
4845 024412 012700 024664 MOV #WPATOO,RO 
4846 4416 173010 wi2: SUBD  (RO),ACO : TEST INSTRUCTION 
4847 026420 170205 STFPS RS “GET FPS 
4848 0 4422 170011 SETD =SET DOUBLE MODE 
4849 024424 012700 024664 MOV #WPATOO,RO 
4850 4430 174010 STD ACO, (RO) :GET THE RESULT 
4851 024432 012701 024664 MOV #WPATOO,R1 
4852 4436 012702 000004 MOV 4 
4853 024442 02 021 w13: CMP (RO)+, (R1)+ :1$ RESULT CORRECT? 
485% 024444 001404 BEOQ wi4 se 
4896 024446 004737 024632 JSR PC ,WSETUP 
4857 024452 104135 1$: ERROR +135 
4858 024454 0515 BR WDONE 
4859 024456 07 207 wi4: SOB R2,W13 
4860 0 4460 022705 000204 CMP #204,R5 :1S FPS CORRECT? 
4861 4464 001407 BEQ w15 we 
1ees 0 4466 012737 000204 001242 MOV #204, $TMP4 
4864 0 4474 010537 001240 MOV R5,$TMP3 
4865 024500 104141 1$: ERROR 
4866 024502 000500 BR wDONE 
4867 0 tebe WS: 
45 012737 024512 001110 #1$,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4868 024512 012700 000200 1$: #200,R0 
4869 4516 170100 0 :SET DOUBLE MODE 
4870 024520 012700 024664 #WPATOO.RO “LOAD ACO=0 
4871 024524 172410 (RO) ,ACO 
4872 024526 012737 024544 001236 16,$TMP2 
73 0245 00 000 
4874 024536 170100 sENTER FLOATING MODE. 
4875 024540 012700 024664 #WPATOO,RO 
4 26 4544 173010 wl6: (RO) ,ACO : TEST INSTRUCTION. 
7 4546 170205 : ig 
4 78 4990 170011 “RESET TO DOUBLE MODE 
4552 012700 024664 #WPATOO,RO “GET THE RESULT. 
4556 174010 ACO. (RO) 
4881 024560 012701 024664 #WPATOO,R1 
4882 024564 012702 000004 #4,R2 


eee ee eee 


TOG ET EE TEE TT EEE Lh i sc me 
: 
; 


CKEPADO FRIIF FLTG PNT PRT A 


TEST # 25 = ADDF .ADDD,SUBF AND SUBD WITH FSRC=AC=0 T 


; 882372 O6i46« 
" 10<1 3 024632 





000004 
4 4614 gE 000004 
4 4622 537 001240 
4 & g 10414 ¢ 
4 0246 00042 
4 
4 
4 024664 
4901 024664 
& 4 024664 
: 024664 
4905 024 
a 4 
4 ‘& 
4 4 
4 
4910 024 
4911 024 
targ 4 
491 4 
4914 
4915 5744 9 
024704 104413 
491 : 


— om A TT ee 
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001242 


wi?: CMP (RO)+, (R1}+ 
BEQ W20 
JSR PC. WSETUP 

1$: ERROR +136 
BR WDONE 

w20: S08 R2,W17 
CMP #4.R5 
BEQ 
MOV a4. STP 
MOV STMP3 

1$: ERROR rs 45 
BR WDONE 

:SET UP FOR ERROR CALL 

WSETUP: MOV #WPATOO,STMP3 
MOV #WPATOO, $TMP4 
MOV #WPATOO, $TMP6 
MOV #WPATOO 
RTS PC 

WPATOO: .WOR 0 

WPATO1: .WORD 0 

WPATO2: .WORD 0 

WPATO3: .WORD 0 

APOO: .WORD 0 

WDATO1: .WORD 0 

WDATO2: .WORD 0 

WDATO3: .WORD 0 

WDONE : 
RSETUP 


SEQUENCE 


71S RESULT CORRECT? 
NO. 


:IS FPS CORRECT? 
:NO 


:GO INITIALIZE THE FPS AND STACK; AND 
>SEE IF THE USER HAS aoa ti tu 

; THE DESIRE TO C E THE SOFTWARE 
:VIRTUAL CONSOLE SWI1 "7H REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


104 
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"ES’ # 26 = ADSD AND SUB wi TH FSRC=0 


69246 .SBTTL TEST # 26 = ADDD AND SUB WITH FSRC=0 
5, eeeeaenageearnercareeeececeeeeeeeracaeeareraeeaeercaranaeserarvenanee 
seTEST 26 ADDD AND SUB WITH FSRC=0 
-* 


*e THIS IS A TEST OF ADD AND SUB WITH FSRC=0. 


“* SSSR ae ee eee eae eeaeeeeeeeaaneteene 





- 4706 009006 $126: SCOPE 
4 : 
4710 012737 026716 901110 MOV #1$,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
49 4716 012700 000200 1$: MOV #200,R0 
49 47 70160 LDFPS RO :SET DOUBLE MODE 
49 4724 0127 025470 MOV #XPATOO,RO :SET ACO TO POSITIVE 
49 4730 010037 025456 MOV RO. XTMP “NUMBER #0 
49 4734 17 $10 LDD (RO) ACO 
4931 026736 012737 026750 001236 MOV #X2,$TMP2 
49 4744 012700 025500 MOV #XPAT10.R0O sFSRC=0 
49 4750 17 910 K2: ADDD (RO). AC *TEST INSTRUCTION 
49 4752 17020 STFPS RS 
46935 026754 170011 SETD 
49 46756 012700 025460 MOV #XDATOO,RO :GET RESULT. 
4937 024762 174010 STD ACO, (RO) 
49 4764 012701 025470 MOV #XPATOO,R1 
49 4770 012702 000004 MOY #4 R 
4940 0246774 022081 x3: CMP (RO)+,(R1)+ :1S RESULT CORRECT? 
4941 026776 001401 BEQ x4 
4942 025000 000561 BR XERR1 
4943 025002 077204 X46: $08 R2,X3 
4944 025 012704 000200 MOV #200,R4 
4945 025010 020405 CMP R4 RS :1S FPS CORRECT? 
494 5012 Aste BEOQ x 
4947 3014 000137 025426 - JMP XERR2 
5 § 012737 025026 001110 MOV #1$, SLPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4949 3006 012700 000200 1$: MOV #200,R0 
4950 025032 170100 LDOFPS RO :SET DOUBLE MODE 
4951 308 01 700 025510 MOV #XPAT20,R0 -SET ACO To 
495¢ 0 01 025456 MOV RO. XTMP =NEGATIVE NUMBER 
495 4 172610 LDD (Rd) ACO 
4954 025046 012737 025060 001236 mOV #X6,$TMP2 
4955 025054 012700 025500 MOV #XPAT10.RO :FSRC=0 
4956 178010 x6: aDrD «=—_—« (RO) . ACO *TEST INSTRUCTION 
4 5 17 STFPS RS 
4 170011 SETD 
495 01 700 025460 MOV #XDATOO,RO :GET RESULT 
4960 025 17401 STD ACO, (RO 
4961 025074 012701 025510 MOV #XPAT20,R1 
496¢ 5100 012702 000004 MOV #6 
4963 025104 021 x?: CMP (RO) +, (RI) :]S RESULT CORRECT? 
4964 0251 1401 BEO x10 
4965 02511 000515 BR XERR1 
4966 5112 0 204 x70: $08 R27 
4967 025114 127 000210 MOV #210,R4 
4968 0251 02 05 CMP Ré RS -1S FPS CORRECT? 
4969 51 1401 BEQ x14 
4970 025124 0 XERR2 


oe = a ee ee ee ee ee eee ee -__+ -— 


4972 325’ 
4973 025146 
4976 025146 
4975 025146 
497 5152 
497 5154 
4978 025162 
4979 0251 
4 51 
4981 317 
4 ¢ e508 
4 
384 098502 
5 
§21 
5 
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ee eee eel elo elelalolelololololololelaisiela) 
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5 
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5 

5 

5 

525 

5254 
5000 ; ¢ 
$000 095362 
5 ¢ ; 74 
5 76 
5004 025 
aRye ; 2 
$006 995306 
5008 025314 
$009 095320 
Sor1 035896 
sore O35 
5014 025 
$015 0983 
2818 0 3329 
501 
$0 
5 


We wrh— 
Ooooo 
WMA 
ae 

& 


vw 
oO 


NN Ne eye 
ere pie hes 

SSSA ASSSN 
SRSSNsNsssh 


oo-0o-—- 00-00-00 
© 
Nm 


cfPADO FRITS (TG ENT PRT A 
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025134 

200 
933670 
025456 


063386 
025500 


025460 
025470 
000004 


000200 


000210 


eee 
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001510 


001236 


001110 


001236 


uTT: 
$: 


ed 


M12: 


x13: 


x16: 


x15: 
1$: 


X16: 


M17: 


x2C: 


M21: 
;REPORT 
XERR1: 


1$: 


MOV #1$, SLPERR 
MOV #200,R0 
LDFPS) oR 

MOV #XPATOO.RO 
MOV x TMP 
LOD CRO) ACO 
MOV 12.$TMP2 
MOV #XPAT10.RO 
SUBD (RO) ACO 
STFPS 

SETD 

MOV #XDATOO,RO 
STD (RO) 
MOV #XPATOO,R1 
MOV #4.R2 

CMP (RO) +, (R1)+ 
BEO x14 

Bk XERR3 

$0B R2,x13 

MOV #200,R4 
CMP R46 RS 

BEQ x15 

BR XERRG 

MOV #1$, SLPERR 
MOV #200,R0 
LDFPS RO 

MOV #XPAT20,R0 
MOV xT 

LDD (RO) ACO 
MOV #x16,$TMP2 
MOV #XPAT10,RO 
SUBD (RO) .ACO 
STFPS RS 

SETD 

MOV #@XDATOO.RO 
STD ACO, (RO) 
MOV #XPAT20,R1 
MOV #6_R 

CMP (RO)+, (RID 
BEQ x20 

BA XERR3 

$06 Re x17 

MOV #210. RS 
CMP ré_R5 

BEO x24 

BR KERRG 

BR XDONE 

DATA ERRORS 

MOV #XPAT1O.$ITMP3 
MOV XTMP. $TMPS 
MOV #XDATOO, STMPS 
ERROR +163 

BR XDONE 


c 9 
46-1 


SEQUENCE 


:SET UP THE LOOP ON ERROR ADDRESS. 


OUBLE MODE 
. TO NON-ZERO 


sSET D 
sSET A 
; VE NUMBER 


ET 
-POSIT 
sFSRC=0 
sTEST INSTRUCTION 
:GET RESULT 


:1S RESULT CORRECT? 


:I1S FPS CORRECT? 


:SET UP THE LOOP ON ERROR ADDRESS. 


7SET DOUBLE MODE 
;SET ACO=A NEGATIVE 
> NUMBER 


:FSRC=0 

:TEST INSTRUCTION. 
:GET RESULT 

s1S RESULT CORRECT? 


:1S FPS CORRECT? 


106 


— _ ee 


d. 9 
“eFRPADO FRTTE FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 46-2 SEQUENCE 
"EST @ 26 = ADDD AND SUB wi TH FSRC=0 


$087 058408 He te i KERR: MOV #XPATIO. SIRES 


5365 0012464 MOV spate. STRPS 
$253 15737 025456 001246 MOV XTMP .$ TMP6 
$632 104144 1$: ERROR +144 
a 1 025426 000435 aa DONE 
$6 ¢ sREPORT FPS ERRORS 
8 5 025426 KERR2 
5 0254 010537 001240 MOV RS. STMP3 
28 0254 010437 001242 MOV R4,STMPS 
0254 106145 1§: ERROR #145 
4 5440 000427 etal XDONE 
5040 gee XERKS: 
5041 025442 010537 001240 MOV RS. STMP3 
anee 0 e468 010437 001242 MOV R4,STMPS 
5045 02545 104146 1§: ERROR +146 
5044 025454 000421 BR XDONE 
5045 025456 000000 XTMP: WORD 0 
5 025460 000000 XDATOO: .WORD 0 
5047 025462 000000 XDATO1: .WORD 0 
anes 025464 000000 MXDATO2: .WORD 0 
ish 025466 000000 XDATOS: .WORD 0 
5051 025470 010421 XPATOO: .WORD 010621 
e026 025472 et: XPATO1: .WORD et 
053 025474 03146 XPATO2: .WORD 03146 
2038 025476 042104 XPATOS: .WORD 042104 
3036 8 5500 000000 XPAT10: .WORD 0 
a2 5502 000000 KMAPT11: .WORD 0 
058 025504 000000 MPAT12: .WORD 0 
5059 5506 000000 XPAT13: .WORD 0 
5060 025510 104210 XPAT20: .WORD 104210 
5061 §512 1 tage! XPAT21: .WORD 114631 
ane8 5514 1¢2 6 XPAT22: .WORD 162636 
ene 025516 13567 MPAT23: .WORD 1356€7 
ig: 0¢33¢0 XDONE : 
0255 104413 RSETUP 3:GO INITIALIZE THE FPS AND STACK: AND 
=SEE IF THE USER HAS EXPRESSED 


0 THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH _— (HAS 
; THE USER TYPED CONTROL G?) 


—E 9 
“aSPADO FRTTIFE FLTG ENT PR A MACRO #1113 20-OCT-81 08:47 PAGE 47 SEQUENCE 108 


TEST @ 2” = SUBD wits AC=0 TES! 
-SBTTL TEST # 27 = SUBD WITH AC=0 TEST 


"SO Seeeeeeeeeeeeeeeeeeeeeeeeeeeaaeeaeeaeeneeeeaeeeteetateeeraeeeee 


SeTEST 27 SUBD WITH AC=0 TEST 
-* 


$074 





9 $522 0: 1$127: SCOPE 
5075 35 4 0030 7 026060 CLR YFLAG 
2078 8 5 } 7 026100 shes MOV #YPATOO,YTMP1 ;:P 
se7t 12737 026110 026064 MOV MYPATIO,YTIMP2 =:N 
3078 0 354 012737 000210 026 Se MOV #210, YTMP3 
3585 912737 025560 9001110 MOV #1$.SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5080 025 012700 2 1$: MOV #200,R0 
5081 025564 170100 LDFPS = RO :SET DOUBLE MODE 
5566 012700 026120 MOV #YPAT20,RO “SET AC9=0 
6572 172610 LDD (RO) ACO 
5084 025574 013700 026062 MOV YTMP1 RC 
5 02! 173010 v2: SUBD (RO), ACO :TEST INSTRUCTION 
025602 170205 STFPS RS 
0 5604 170011 SETD 
5 3006 012700 026070 MOV #YDATOO,RO :SET RESULT 
025612 174010 STD ACO, (RO) 
5090 025614 O12 02 000004 MOV : 
5091 025620 013701 026064 MOV YTMP2,R1 :CHECK RESULT. 
309 025624 022021 v3: CMP (RO)+,(R1)+ 
5093 025626 1086 BNE ¥6 
5094 025630 0 re SOB R2,¥3 
5095 0 5632 025 05 026066 CMP YTMP3,R5 :FPS CORRECT? 
3096 368 1401 BEQ v4 
5 8 yi ete BR YERR3 
2098 564 5737 026060 v6: TST YFLAG :FINISHED TEST? 
e268 001015 BNE : 
51 565 ot 737 (177777 026060 MOV #-1, YFLAG 
5101 025656 012737 026110 026062 MOV #YPAT10, YTMP1 
51 é 012737 026100 926064 MOV #YPATOO, YTMP2 
51 3672 012737 000200 026066 MOV #200, YTMP3 
3} 5 724 rib ¥7 
105 0 3702 51 v5: BR 1DONE 
51 5 072702 000004 v6: MO\ #4R2 
51 5710 ot 4 026062 MOV #YTMP1_RO :DID XOR OF SIGN BIT 
31 a7 14 12701 026070 MOV #YDATOO,R1 “FAIL? 
1 ? 021 Y?: CMP (RO)+, (R1)+ 
110 0257 1002 BNE VERR1 
111 025724 077 $08 R2,Y7 
118 5726 000421 BR YERR2 
11 5 YERR1: :DATA FAILURE 
114 0257 1 73? 025600 001236 MOV #2, $TMP2 
115 0257 13737 026 001240 MOV YIMP1,STMP3 
116 5744 012737 0 6120 001242 MOV #YPAT2O, STMP4 
7 3732 12737 026070 001244 MOV #YDATOO, STMPS 
118 760 013737 026064 001246 MOV YTMP2,$TMP6 
1 3766 104147 1$: ERROR +147 
120 025770 000457 YDONE 


ee ee ee == 


7* THIS IS A TEST OF SUBD WITH AC=0. 


BOTH POSITIVE 


:* AND NEGATIVE FSRC*S ARE TRIED. 


s ,eeeeenenagaerarceaeraeaererererergenaeeeereenrreneeseneenneeteneneaee 
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"EST @ 27 = SUBD wITw AC=0 TES’ 


$121 02577 VERR2: :MOR OF SIGN BIT 
3} ; 5772 012737 025000 001236 MOV #Y¥2.STMP2 sFAILED 
1 13737 9 001240 MOV YIMP1_$TMP3 
513% 12737 026120 001242 MOV #YPATOO, STMP4 
51 14 012737 026070 0012464 #YDATOO, STMPS 
1 013737 026064 001246 Vv YTMP2, 
51 104150 1$ ERROR +150 
3} 0 0004 36 En YDONE 
139 0 VERR3: :FPS WRONG. 
$1 12737 025600 001236 MOV #Y2,STMP2 
§131 2 01 537 001240 MOV RS, $TMP3 
5132 0 1 7 026066 001242 MOV YTMP3.STMP4 
5133 026054 104151 1$: ERROR +151 
31 $ 026056 000424 BR YDONE 
5136 0 ret 000000 YFLAG: .WORD 0 
5137 0 000000 YTMP1: .WORD 0 
51 026064 000000 vTMP .WORD 0 
aE Fs 6066 000000 Y TMP -WORD 0 
5141 026070 000000 YDATOO: .wORD 0 
3148 026072 000000 YDATO1: .WORD 0 
51435 026074 000000 YDATO2: .wORD 0 
be: 026076 000000 YDATOS: .WORD 0 
5146 0 6100 063146 YPATOO: .WORD 063146 
5147 026102 052525 YPATO1: .WORD g2$382 
$148 026104 042104 YPATO2: .WORD 042104 
g18) 026106 167356 YPATOS: .WORD 167356 
5151 026110 163146 YPAT10: .WORD 163146 
a13¢ 026112 052525 VPAT11: .WORD 05252 
5153 026114 042104 YPAT12: .WORD 042104 
3134 026116 167356 YPAT13: .WORD 167356 
5156 026120 000000 ee -WORD 0 
5157 026122 000000 YPAT21: .WORD 0 
5158 8 6124 000000 YPAT22: .WORD 0 
5159 126 000000 YPAT23: .WORD 0 
5161 9g61 38 YDONE : 
026130 104413 RSETUP : 60 INITIALIZE THE FPS AND STACK: AND 


;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOFTWARE 
>VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7 THE USER TYPED CONTROL G??). 





“aS RADC FO 
res’ @ 
57 7¢ 
926132 
5171 026134 
5172 026140 
5173 026146 
$174 026154 
026154 
2176 056166 
8179 096170 
5 74 
5 7¢ 
5 0z 
5 0« 





~~ — 
ANI & 


Ok kd a od ed ed od 
ARGUS SLE REANLSSEVEALANSSSSNSER RAV 


SSUES RUSE 





POPUP FIAFIAAAM AVIVA MAA AIA AVI AIA UU 


Ss 258 


ee: 
onmnn uw 


ad med = oetd 


WIPO 


—OOoooo 


Se 


"F €. 7G ENT PR” A 
= ADDD elt £C=0 Tes’ 


026370 
026406 
000200 


026162 
000200 


026426 
026372 
026376 


000004 
026372 


026374 


026370 
177777 


026416 
000210 


096373 
096396 
026372 


abi 246 
00124 
026574 


G 9 
MACRO ™1113 20-OCT-81 08:47 PAGE 48 


026372 
026374 


001110 


SEQUENCE 


TEST # 30 = ADDD WITH AC=0 TEST 


“SSSR eeeeaeaaaeaeeenaaeeaeeeeettaneeaeeteanteeeeee 


ADDD WITH AC=0 TEST 


**TEST 30 


:3 
:@ THIS IS A TEST OF ADDD WITH AC= 0. 


BOTH 


3* POSITIVE AND NEGATIVE FSRC‘S ARE TRIED. 


J TAAAAAAAAAAAAAAAAH KAKA HTKTAAAAAAARAeAKAHARAReAeAKARAReHAEHAReEe 


$130: 


1$: 


Ze: 


73: 


74: 


75: 


76: 
ZERR1: 


1$: 


ZERR2: 


1$: 


ZFLAG 
#7PATOO,21MP1 
#200, 2TMP2 


#1$.$LPERR 
200,R0 


#ZPAT20 RO 
ach 


#Z7DATOO,RO 
ACO, (RO) 


oR 
ZTMP1,R1 
_— 


Z 

ZERR1 
R2,723 
ZTMP2 RS 
z5 


ZERR2 
et 


#1, ZFLAG 
#Z7PAT10,Z1MP1 
#210,ZTMP2 


ZDONE 


#22, STMP2 
ZTMP1 .STMP3 
#ZPATOO, STMPS 
#7DATOO, STMPS 
ZTMP1 , STMP6 
+152 


7DONE 

#72. $TMP2 

RS, $TMP3 

7TMP2,$TMP4 
+153 

ZDONE 


sP 


:SE* UP THE LOOP ON ERROR ADDRESS. 
ss DOUBLE MODE 

7SET ACO=0 

s TEST INSTRUCTION 

;SET RESULT 


sRESULT CORRECT? 


FPS CORRECT? 


FINISHED TEST? 


:DATA FAILURE 


110 


- oe --— 


“a6 PADO FPT16 FLTG PNT PAW 
TEST #@ 30 = ADDD wITw AC=0 TES’ 


a 
: 


19 
it 


NOUS wits 


Oooo 
EERE 


SS ENS RVSS RUS 


2000 
Sk SESS FEES 


idabbahbahbchbahb Ab rdh Ab Abeah Ah sl sl ab ah al sl aleal altaltal 
w 


a 
o 
oOo OOOO 


roronrnrn 


mr 


r33 


: 


No 


oo 
— 
— 
RE 
SuUow WS —w 


ae 
—NVWA Ww 


~ 


— ee _—— _——— $2.) — ee ee ae eee es + ee 


ZFLAG: .WORD 
Z™™P1: .WORD 
Z™MP2: .WORD 
ZDATOO: .WORD 
ZDATO1: .WORD 
ZDATO2: .WORD 
ZDATO3: .WORD 
ZJPATOO: .WORD 
Z7PATO1: .WORD 
ZPATO2: .WORD 
ZPATO3: .WORD 
ZPAT10: .WORD 
ZPAT11: .WORD 
ZPAT12: .WORD 
ZPAT13: .WORD 
ZPAT20: .WORD 
ZPAT21: .W7RD 
ZPAT22: .WORD 
Z7PAT23: .WORD 
ZDONE : 
RSETuUP 
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oo°oo --—-—-- —--900 2O0O000° GOO 
FUnow Ww 


:GO AS THE FPS AND STACK; AND 

:SEE IF THE USER HAS E tbs «34 

+ THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
[THE USER TYPED CONTROL G?) 


SEQUENCE 


117 


- CT TTT, oT TTT ETE TEE TTS ETS TTT TTT TTT EE  —_ 


. | 
CREPADO FPTTIF FLTG PNT PRT A MACRO M1113 20-OCT-81 08:47 PAGE 49 SEQUENCE Tic 
TEST @ 3° ~ ADDF & ADDD EC A\C)=ECFSRC) & (Bul FT) TEST 


$250 -SBTTL TEST # 31 = ADDF & ADDD EC(AC)=E(F SRC) & (BuT FT) TEST 


FLPMA RR eR Aee Ae AA eeeAHeeeeeeteeeeaeaneeeeaeeneteteeeeenetenesereee 
;eTEST 31 ADDF & ADDD E(AC)=EC(FSRC) & (But FT) TEST 

S 

7* THIS IS A TEST OF THE ADD INSTRUCTION WITH THE 

7* OPERANDS HAVING EQUAL EXPONENTS. THE (8UF FT) 

7* FORK IN THE ROUND/TRUNK FLOWS IS ALSO TESTED. 

-* 


22 SHS KeHTeEA eee eeeeReeeaeaaeeekaeeaeaaeaeaeaeaeeaaaeteeaeteanekeeaeeaneece 


026440 020004 7$131: SCOPE 
5251 02644 AAl: 
0 644 012737 026450 001110 MOV #1$. SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
s 52 6450 012700 003240 1$: MOV #3240,R0 
6253 026454 170100 LDFPS = RO :SET FIV FIV FD AND FT 
5254 026656 01273 027036 000244 MOV MAAERRO,FPVECT =IN CASE THE OVER/UNDER 
5 35 626464 012700 027414 MOV #AAPATO.RO :FLOwS IN TRAP WILL 
5 3$ 0 6470 172410 LDD (RO) ACO “SET UP ACO 
7 58 6472 012737 026504 001236 MOV #AA2 , STMP2 : OPERAND 
5259 026500 012700 027424 MOV #AAPAT1_ RC 
5260 026504 172010 AA2:  ADDD (RO), ACO : TEST INSTRUCTION 
5261 “SHOULD TRUNCATE 
5 ¢ 026506 012700 027404 AA3: MOV #4ADATO,RO 
5263 026512 174010 STD ACO, (RO) :GET THE RESULT 
5264 026514 012701 027434 MOV #AAPAT2,R1 
$265 026520 012702 000004 MOV #4.R 
5266 026524 022021 AAG: CMP (RO)+, (R1)¢ : CORRECT? 
5267 026526 001414 BEOQ AA? 
\ 8 0 65 012700 027444 MOV #AAPAT3,RO :DID (BUT FT) FAIL 
5 ; 6534 012701 027404 MOV #AADATO.R1 
5270 026540 012702 000004 MOV #4 R2 
5271 026544 022021 AAS: CMP (RO)+, (R1)+ 
5 re 026546 001401 BEO AA6 
5273 026550 000565 BR AAERR1 :DATA ERROR 
527% 0 6552 077204 AA6:  S$0B R2, AAS 
5275 026554 000137 027160 MP AAERR2 : (BUT FT) ERROR 
> 76 026560 077217 AA?: SOB R2, AAS 
2 78 :NOW TEST DOUBLE FLOATING ROUND MODE. 
5280 AA10: 
737 026570 001110 MOV #1$.SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5281 700 003200 1$: \ #3200,R0 >SET FD FIV FIV. FT=0 
3 100 LDFPS = RO 
700 027414 V #AAPATO.RO 
‘ 410 LDD (RO) acd :SET UP ACO OPERAND 
; 5 737 (026616 001236 MOV #AA11, STMP2 
700 027424 MOV #AAPAT1_. RO 
3 010 AA11: ADDD  (RO),ACO :TEST INSTRUCTION 
; SHOULD ROUND 
; 700 027404 AA12: MOV #AADATO,RO 
010 STD ACO (RQ) :GET THE RESULT 
5291 01 027444 MOV #AAPAT3,R1 
5 ¢ 702 000004 MOV #4.R 
3 2 4 AA13: CMP (RO)+, (R1)+¢ = CORRECT? 
0 425 BEQ AA 
5295 0 700 027434 MOV #AAPAT2,RO :DID (BUT FT) FAIL? 





” 
“KFRADO FPRIITE FL TG PNT PRT A MACRO M1113 3 og Te 08:47 PAGE 19-3 SEQUENCE 113 








TEST @ 31 = ADDF & ADDD E(AC)=E(FSAC) & (BUT FT) TEST 
s 12701 0274606 MOV #AADATO,R?1 
5 018703 060004 MOV as 
5 02202 AAl4: CMP (Rb) +, (R1)+4 
4 1613 BEO AAI7 
5 12700 027654 MOV #AAPATS RO :WAS THE FLOATING 
5301 012701 027406 MOV #AADATO.R1 “CONSTANT USED 
5 3 012702 MOV #4,R2 > INSTEAD OF THE 
5 02 021 AA1S: (MP (RO) +, (R1)+ :DOUBLE CONSTANT 
7401 BEQ AAI > IN THE ROUND 
5305 090544 BR AAERRS FLOWS? 
5 077204 AA16: SOB AA15 A ERROR 
« 900 46 BR RAERRY “CONSTANT” ERROR 
5 16 AA17: SOB 2,AA 
5 900 62 BR nAERRS - (BUT FT) ERROR 
> 10 77230 AA2G: SOB R2,AA13 
> 12 :NOw TEST ADDF WITH FT=0, ROUND MODE 
5314 026716 AA21: 
026716 012737 026726 001110 MOV #1$,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5315 026726 012700 003200 1$: MOV #3200,R6 Fiv=1, Flv=1, FT=0 
5316 026730 170100 LDFPS R 
5317 026732 012700 027414 MOV #AAPATO.RO :LOAD ACO OPERAND 
0318 0267 172610 LOD (RO) ACO 
5319 026740 170001 SETF :ENTER FLOATING MODE 
23 026742 012737 026754 001236 MOV #AA22 ,. STMP2 
5321 0 6750 012700 027464 MOV #AAPATS RO 
3328 26754 172010 AA22: ADDF (RO), wi :TEST INSTRUCTION 
53 “SHOULD ROUND 
5324 026756 AA23: 
5325 026756 170011 SETD :RESET TO DOUBLE 
: $ 026760 012700 027404 MOV #AADATO.RO “GET THE RESULT 
5 764 174010 STD ACO, (RO) 
5 6766 012701 027474 MOV #AAPAT6,R1 = CORRECT? 
5 6772 012702 000002 MOV f 
5331 $776 022021 AA24: (CMP (RO) +, (R1)+ 
5 000 1413 BEQ AA27 
53 7002 012700 027434 MOV #AAPAT2 RO WAS THE DOUBLE 
33 7 012701 087404 MOV #AADATO.R1 “CONSTANT USED INSTEAD 
5335 027012 012702 002 MOV #2,R2 [OF THE FLOATING 
5 701 2011 AA2S: CMP (RO) +, (R1) ; CONSTANT IN THE 
S 70 1601 BEC AA26 “ROUND FLOWS? 
7022 5 BR AAERR “DATA ERROR 
7024 3p AA26: S0B R2, 5 
0 0270 0 BR AAERR? = CONSTANT ERROR 
; 1 0270 216 AA27:  S0B R2,AA24 
2 027032 000137 027504 MP ONE 
; $ :COME HERE IF A TRAP OCCURS TO 244. 
6 ? 36 13700 001236 AAERRO: MOV STMP2, RO :SEE IF THE TRAP WAS 
5 5720 TST (RO) + T A TEST INSTRUCTION 
< 4 020016 CMP RO, (SP) 
8365 O570S0 DOOTS? 042534 ——— we 
2338 Mee 1$: 


~ —_— EEE TTT, LT | ee 
—_ —— - - . 


5 7054 


38 § 


a3 705 
2328 7 
si Bs 
5 3S 7072 
5 : 7074 
535 76 
5 710 
ee 
5 ; 711 
3 Bris 
Sse 0 7139 
: 

3 Ber 
5371 0 126 
5 re 027146 
5373 027154 
5374 027156 
a Sri 
5377 8 719% 
5378 027202 
0 Br 
3 Bee 
3 8 
5384 0272352 
6 Be 
2389 027254 
5 027 28 
5389 027 
5390 027266 
oe) ae 
$398 027310 
5394 027312 
a3e2 : 7314 
5 i 73 
os rhe 
3 
se feras 
a erat 
oi Ber 
ib ras 
oe rs 
54 7404 
5408 027414 


=—OOo0O0O0O00 -OO000 -$O000 
MIMIAIIYIONY Mongnny 
SN SN NU Ss Ss 


mrr 


—Ooooe 


x anans 


“mERPADO FETTF FLTG PNT PRT A 
TES’ @ 31 = ADDF & ADDED ECACI=EC(FSRO) & (BuT FT) TEST 


000010 


000012 


001236 


027504 
001236 


Oooo 


Oooooe 
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001246 


001244 


001246 


STS! 
CMP 
BEQ 
CMP 
BEQ 
BR 
20$ 
208: MOV 
CMP 
21$: ERROR 
25$: JMP 
30$: MOV 
CMP 
31$: ERROR 
BR 
;ADDD RESULT INC 
AAERR1: MOV 
AAER10: MOV 
MOV 
MOV 
1$: ERROR 
BR 
AAERR2: MOV 
MOV 
MOV 
MOV 
1§: ERROR 
BR 
AAERR3S: MOV 
BR 
AAERR4: MOV 
MOV 
MOV 
MOV 
1§: ERROR 
BR 
AAERRS: MOV 
MOV 
MOV 
MOV 
1§: ERROR 
BR 
AAERR6: MOV 
MOV 
MOV 
MOV 
1§: ERROR 
BR 
AAERR7: MOV 
MOV 
MOV 
MOV 
1$: ERROR 
BR 
AADATO: .WORD 
AAPATO: .WORD 


SEQUENCE 


RO :GET FEC 


RO.#10 

20 : OVERFLOW 
RO.#12 

30$ : UNDERF LOW 
10$ 


(SP) .STMP2 
(SP)+,(SP)+ 
154 


+ 


AADONE 

(SP) ,STMP2 
(SP)+,(SP)+ 
+155 


25$ 
ORRECT 


sREPORT OVERFLOW ERROR 


;REPORT UNDERFLOW 
: ERROR 


; (BUT FT) FAILED. 


:DATA ERROR. 
;BAD CONSTANT 


; (BUT FT) FAILED. 


:FD=0 AND 
:DATA ERROR 


AADON 

#AAPATS ,STMP3 
#AAPATO,STMP4 
#AADATO, STMP5 
—_e, 
+ 


AADONE 
0,0,0,0 
260,0.0.0 


; CONSTANT ERROR 


114 


ee ee — > «= 


A A TTT 
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TEST # 31 = ADDF & ADDED ECACI=ECFSRC) & (BuT FT) TEST 


SEQUENCE 115 


$409 027424 AAPAT1: .WORD  200.0.0,1 

5410 0276 AAPAT2: _WORD 400.0.0.0 

5411 0274664 AAPAT3: .WORD 400.0.0.1 

9618 7654 1 AAPAT4: .WORD 400.0, 160000..0 
5413 0276 000000 AAPATS: .WORD 200.1.0.0 

5416 027676 209 800001 000000 AAPAT6: .WORD 400.1.0.0 

5415 75 AADONE : 

027504 104413 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE wee HAS EXPRESSED 

:THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH — (HAS 
;THE USER TYPED CONTROL G?) 


mm mr ree — _ — 


$426 

027506 
358 027510 
. 7510 
54 7516 
5430 027522 
5431 027524 
54 ¢ 027532 
see? 027536 
5434 0627540 
5435 027544 
5436 027546 
5437 027550 
5438 Og 7328 
5439 027556 
5440 027562 
5441 0 7398 

ore 0275 
5443 027572 
5444 027576 
5445 027602 
ars ag rere 
5447 027610 
5448 027612 
5449 027616 
5450 027620 
5451 027624 
2426 027626 
5453 027630 
5454 027632 

5455 

5456 027636 
7636 
5457 027644 
225 O5r6s> 
35 097660 
ri 1 oeee 
278% Oorer> 
5464 027674 
5465 1109 

96 7 

is 6 
5468 927710 


S 
3 


6 tee eee ote -o-—- 0 - 00 - 0° 
vr N—- wy NUN 
=PMINPINIPS —NININ HMONIMNN Pow 


<e 
™~ 
~ 
Wo 


SONS NS 
SSSSVERN 


o— 
uw 


“KFRADO FRITE FLIG PNT PRT A 
TES’ @ 32 =~ ADDF & ADDE wl ECAC) LESS THAN ECFSRC) TEST 


TEST # 32 - ADDF & ADDD WITH ECAC) LESS THAN E(FSRC) TEST 


027516 
003200 
027544 
031172 
031212 


031162 
031212 
000004 


031162 
031172 
000004 
030560 


030616 


030524 
027644 
003200 


027672 
031172 


031202 


031162 
031262 
000004 
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001110 


001236 


001110 


001236 


- SBTTL 


SEQUENCE 


THEN SIMPLE 
SITUATIONS ARE 


ST CAS 
NOTE ECAC) IS LESS THEN E(FSRC) 


2 RARER AAAARERAAAAAEAEAATAAEEAAAAAAAAARAAARAEAAAERAREEE HARRAH 


EXPONENT DIFFERENCE=57=71 (OCT) FD=1 
:SEi UP THE LOOP ON ERROR ADDRESS. 
sSET FIV,FIV, AND FD 


;SET ACO OPERAND 
;ACO 


;TEST INSTRUCTION 
:GET FPS 

3GET THE RESULT 
:1S IT CORRECT 


:DID A BAD 

: CONSTANT (NOT 57) 
;GET GENERATED 
sFOR THE ALIGNMENT 
3FLOWS? 

;DATA ERROR.D 

;BAD CONSTANT.D 
sFPS CORRECT? 

Be 


:SET UP THE LOOP ON ERROR ADDRESS. 
sSET FIV.FIV, AND FD 


;SET ACO OPERAND 


sESRC 

STEST INSTRUCTION 
“GET THE RESULT 
:1$ IT CORRECT 


* FLOWS. THE CONSTANT 0 
> *DOUBLE) USED IS CHECKED. 
;* ALIGNMENT 
:*TRIED. 
TST32: SCOPE 
CC1: 
MOV #1$.SLPERR 
1$: MOV #3200,R4 
LDFPS sR 
MOV #CC2,$TMP2 
MOV #CCPO.R 
LDD (RO) ACO 
MOV #CCP2,RO 
CC2:  ADDD  (RO),ACO 
STFPS R5 
MOV #CCDATO,RO 
STD ACO, (RO) 
MOV #CCP2,R1 
MOV #4 .R2 
CC3: CMP (RO)+, (R1)+¢ 
BEQ CC 
MOV #CCDATO.RO 
MOV #CCPO,R1 
MOV #4 R2 
CC4: CMP (RO) +, (R1)+ 
BEQ ccs 
JMP CCER1 
cC5: $08 R2,(C4 
MP CER2 
(C6: SOB R2,CC3 
CMP R4_RS 
BEQ CC7 
JMP CCERO :BAD FP 
i EXPONENT CIFFERENCE=56=70 (OCT) FD=1 
MOV #1$.S$LPERR 
1$: MOV #3200,R4 
LDFPS R 
MOV #CCB,STMP2 
MOV #CCPO,RO 
LOD (RO) ,ACO 
MOV ACCP1_RO 
CC8:  ADDD  (RO),ACO 
STFPS sR 
MOV #CCDATO,RO 
STD ACO, (RO) 
MOV #CCP7.R1 
MOV »R2 


a ee ee ee ee eet 
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r 
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WNISODNANE WUOOBND 


re, 4 7714 
5470 027716 
71 027720 


54 7? 
547 7726 
547 77 
5474 0277 
547 77 
47 7740 


5500 


oo 


WwnN— 
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pee oet 
1415 
1 


0127 
127 
12702 
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—Mmo0o-0—-0—-"0 att 

Suv -oS=noSoRRoOS UY 


NS NO PoNINUM — MINIM LSNOONINY 


— Fn SON 


WOONMWOWONSOO 


ooo-0o-- 0-0-9000 
NVNLSONNO 


SSN NONOON——— 


oOo 
WNIUISO NUNN 


o-~~  O OOOO 
Orongnongny 
wo NS NE 

> arty 2+ 4-9 —OWw 
—~—NOo oon™n 


NNN NO oo 


Vaiss 


CKRFPADO FRTIF FLTG PNT PRT A 
TEST # 32°= ADOF 


931162 
031202 


030524 


027772 
030020 
031172 
003000 


031252 


031162 


031162 
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ADD? wilh ECAC) LESS THAN E(FSRC) TEST 


SEQUENCE 


;CONSTANT (NOT 57) 
:GET GENERATED 
;FOR THE ALIGNMENT 
;FLOWS? 


;BAD CONSTANT.D 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP ACO OPERAND. 
sSET FIV,FIV. CLEAR FD. 


sFSRC 
sTEST INSTRUCTION 


sREENTER DOUBLE MOVE 
:GET THE RESULT 


;IS THE RESULT CORRECT? 


:WAS A BAD CONSTANT 
sUSED (NOT 25) IN 
: THE ALIGN FLOWS? 


;BAD CONSTANT F 


:SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP ACO OPERAND. 
sSET FIV,FIV. CLEAR FD. 


3 FSRC 
:TEST INSTRUCTION 
;REENTER DOUBLE MOVE 


cc9: CMP (RO)+, (R1}+¢ 
BEO ¢c1 
MOV #CCDATO,RO :DID A BAD 
MOV #CCP1_RI 
MOV #4_R 
Cc10: CMP (RO) +, (R1)+ 
BEQ cC11 : 
JMP CCER3 [DATA ERROR.D 
CC11:  $0B R2,(C10 
MP CCER4 
CC12: $08 R2,CC9 
CMP R4-RS :FPS CORRECT? 
BEQ CCi3 
JMP CCERO :BAD FPS. 
jEXPONENT DIFFERENCE=25=31 (OCT) FD=0 
001110 MOV #1$.$LPERR 
001236 1$: MOV #CC14,STMP2 
MOV #CCPO.RO 
LDD (RO) ACO 
MOV #3000,R4 
LDFPS 
MOV #CCP6,RO 
(C14: ADDF  (RO).ACO 
STFPS R5 
SETD 
MOV #CCDATO,RO 
STD ACO, (RO) 
MOV #CCP6,R1 
MOV f 
Cc15: CMP (RO) +, (R1)+4 
BEQ 1 
MOV #CCDATO,RO 
MOV #CCP3,RI 
MOV x 
CC16: CMP (RO)+, (R1)+ 
BEQ CC17 
JMP CCERS :DATA ERROR F 
(C17: SOB R2,(C16 
MP CCER6 
(C18: SOB R2,C(C15 
CMP R4-RS 
BEC 
JMP CCER9O :BAD FPS. 
i EXPONENT DIFFERENCE=24=30 (OCT) FD=0 
001110 MOV #1$.S$LPERR 
001236 1$: MOV #CC20, STMP2 
MOV #CCP3.RO 
LOD (RO) ACO 
MOV #3000, R4 
LDFPS R& 
MOV #CCP5,RO 
CC20: ADDF  (RO).ACO 
STFPS RS 
SETD 
MOV #CCDATO,RO 


“GET THE RESULT 
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“aS PRADO FRTIE 6L°G PNT PR & 
TEST @ 32 = ADDF & ADOT wi" ECAC) LESS THAN ECFSRO) T 


031272 
I00002 


031203 
000092 


031020 
031036 


031072 
031110 


030524 
030400 
003200 


030426 
031172 


031232 


MACRO M1113 20-OCT-81 


001110 


001236 


001110 


001236 


08:47 PAGE 805 
EST 


:1S THE RESLT CORRECT? 


WAS A BAD CONSTANT 


[USED (NOT 25) IN 
= THE ALIGN FLOWS? 


;DATA ERROR F 
;BAD CONSTANT F 


;BAD FPS. 


;SET UP THE LOOP a ADDRESS. 


sSET FIV.FIV, AND 
:SET ACO OPERAND 
sFSRC 

sTES?+ INSTRUCTION 
sGET FPS 

sGET THE RESULT 
31S IT CORRECT 


:DID A BAD 
:CONSTANT (NOT 57) 
;GET GENERATED 
zFOR THE ALIGNMENT 
sFLOWS? 

;DATA ERROR.D 

;BAD CONSTANT.C 
sFPS CORRECT? 


:SET UP THE LOOP ON ERROR ADDRESS. 
:SET FIV.FIV, AND FD 


;SET ACO OPERAND 


STD ACO, (RO) 
MOV #CCP10.R1 
MOV #2,R2 
¢C21 CMP (RO) +. (R1)+ 
BEOQ (C24 
MOV #CCDATO.RO 
MOV #CCP5.Ri 
MOV #2.R2 
CC22: CMP (RO)+, (R1)+ 
BEQ (C23 
JMP CCER7 
(C23: $08 R2,(622 
MP CCERB 
(C24: $08 R2,CC21 
CMP R4-RS5 
BEQ (C25 
JMP CCER9O 
ZEXPONENT DIFFERENCE=1 FD=1 
MOV #1$,SLPERR 
1$: MOV #3200,R4 
LDFPS R 
MOV #CC26,$TMP2 
MOV #CCPO._RO 
LDD (RO) ACO 
MOV #cCP3.RO 
CC26:  ADDD (RO) ACO 
STFPS 
MOV #CCDATO.RO 
STD ACO, <RO) 
MOV #CCP11.R1 
MOV #4 R2 
(C27: CMP (RO) +, (R1)+ 
BEO C30 
MOV #CCDATO.RO 
MOV #CCP3.RI 
MOV #4.R2 
(C28: CMP (RO)+. (R1)¢ 
BEQ CC29 
JMP CCER10 
CC29: $08 R2,CC28 
MP CCER11 
(C30: SOE R2,CC27 
CMe R4-RS 
BEQ ce $1 
JMP CCERO :BAD FPS. 
; EXPONENT DIFFERENCE=100=144 (OCT) FD=1 
MOV #1$.SLPERR 
1$: MOV #3200,R4 
LDFPS RG 
MOV #CC32,.STMP2 
MOV #CCPO.RO 
LDD (RO) ACO 
MOV accPé RO 
(C32: ADDD  (RO),ACO 
STFPS 


7 F SRC 
sTEST INSTRUCTION 
-GET FPS 


SE QUE NCE 
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MACRO M7113 20-0CT 
"EST @ 32 = ADDF & ADDED wi" ECAC) LESS THAN ECFSRO) 


001240 
001246 


——b oe et 


(C33: 


(C34: 


Cc35: 
CC36: 


(C37: 
CCERO: 


1$: 
CCER9O: 
1$: 
CCER1: 
CCERSO: 
1$: 
CCER2: 
CCER22: 
1$: 
CCER3: 


CCER4: 


CCERSS: 


1$: 
CCERS: 


CCERSS: 


1$: 
CCER6: 


ee ee ee el 


-B81 08:47 PAGE 5.38 
TEST 


@CCDATO.RO 
ACO, (RO) 
#CCP4_R1 
#4_R2 
(RO)*+, (RI) 


CC56 
#CCDATO,RO 
#TCP4,R 


#4.R2 
(RO) +, (R1)+ 
CC35 


CCDON 
ACCP2,STMP3 
#CCP2,S$TMP6 


#CCPO,STMP4 
#CCDATO,STMPS 
+172 


CCDONE 
#CCP1 ,STMPS 
#CCP7,STMP6 
CCERS 
#CCP1,S$TMPS 


#CCP7,STMP6 
#CCPO,STMP4 


#CCDATO,STMPS 
+173 


CCDONE 

#CCP6,STMP3 
#CCP6,STMP6 
#CCPO,STMP4 


#CCDATO, STMP5 
+170 


CCDONE 

#CCP6,$TMP3 
#CCP6,STMP6 
#CCPO,STMP4 


SE QUE NCE 


sGET THE RESULT 
IS IT CORRECT 


sDID A BAD 
:CONSTANT (NOT 57) 
;GET GENERATED 
sFOR THE ALIGNMENT 
sFLOWS? 

;DATA ERROR.D 

;BAD CONSTANT.D 
sFPS CORRECT? 

;BAD FPS. 

sFPS ERROR D 


sFPS ERROR F 


;DATA ERROR D 


;CONSTANT BAD D(8) 


; CONSTANT BAD D(G) 


;DATA ERROR F 


; CONSTANT BAD F (B) 
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2626 031116 
5655 031124 
5654 031126 
tH 0311 
$26 031142 
5657 031144 
5658 031152 
5659 031160 
5660 0 116 
5661 0311 
ey! 120 
566 121 
5664 031 ¢ 
ae 
5667 03125 
5668 1 $ 
5669 031 
5670 031 
5671 03131 
5672 03132 
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"uSPADO FRIIF FLTG ENT PRT A 
TEST @ 32 = ADDF & ADDED wWI"H ECAC) LESS THAN E(FSRC) TEST 


031162 


oo oo 20 Oo 
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MACRO M1113 20-OCT-81 08:47 PAGE Bone 


091244 


000000 


1§: 
CCER?: 


CCERB: 


1$: 


CCERI0: 


CCER11: 


CCER12: 


CCER13: 


CCDATO: 
CCPO: 


SEQUENCE 


#CCDATO.STMPS 

#174 

CCDONE 

#CCPS.STMP3 :DATA ERROR F 

#CCP10,STMP6 

CCERSS 

ACCP5.STMP3 =CONSTANT BAD F(G) 

#CCP10,STMP6 

#CCDATO,$TMPS 

#CCPO,STMP4 

+175 

CCDONE 

#CCP3,$TMP3 :DATA ERROR D 

#CCP11,$TMP6 

CCERSO 

#CCP3,STMP% : CONSTANT BAD D(G) 

#CCP11,$TMP6 

CCERG4 

#CCP4STMP3 :DATA ERROR D 

#CCPG STHPE 

#CCP4,STMP3 : CONSTANT BAD D(B) 

#CCP4.$TMP6 

CCER22 

0,0,0,0 

200.0.0,0 sE(AC)=1 

16200.0.0.0 =E (F SRC) =E (AC) +56=57 

16400,0,0.0 SE (FSRC)=E (AC) +57=58 

400,0.0,0 sE CF SRC) =E (AC) +7=2 

31200.0.0.0 *E (FSRC)=E (AC) +100=101=145(0CT) 

6200.0,0,0 *E (ESRC) =E (AC) #24=25=31 (OCT) 

6400.0.0.0 *E (FSRC)=E (AC) +25=26=32 (OCT) 

16200,0,0,1 “CCP1 RES 

6200.1,0.0 “CCP5 RES 

500.0,0,6 =CCP3 RES 

200,0,0,0 “BAD CONSTANT :RES CCP2.CCP4 
:GO INITIALIZE THE FPS AND STACK: AND 
“SEE IF THE USER HAS EXPRESSED 


“THE DESIRE TO CHANGE THE SOFTWARE 
“VIRTUAL CONSOLE SWITCH REGISTER (HAS 
“THE USER TYPED CONTROL G?). 


120 


em Lm 
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MACRO M1113 20-OCT-81 08:47 PAGE 51 


" @ 8 = ADDF © ADDD wl E140) GREATER THAN EC(FSRC) TEST 
TEST # 33 - ADDF & ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 
- - SO eeeeeereeeteeateeeeeeeereteteneeeeeeerenentereraeeteeeseeeeee 


ADDF & ADDD WITH E(AC) GREATER THAN E(FSRC* TES’ 
:eTHIS IS A TEST OF THE ADDD AND AD 


Se ae 


s 031324 
5886 031326 
6 
70 
8 0 
031356 
5691 
5692 031356 
569 2 
5694 
5695 


~™N 
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S SSSSSSOR 
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Sacsss 
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NWR Uw fu 
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woo oO 


owwO 
oo~— 
WM — © 


$3s 


032526 
032556 
000004 


032254 


001110 


001236 


- SBTTL 


TeTEST 33 


:* INSTRUCTIONS AND 
;*F LOWS 


ALIGN 


SE QUE NCE 


DF 
FSRC ALGORITHM 


THE 
FIRST THE CONSTANT USED IS CHECKED. 
S ALIGNMENT 


WOR 
E TRIED. 


ST 


;*1S GREATER THAN ECFSRC). 


e 
s 
“SSS aeeeeketeeteeeeeaeeRaRaeaekaeeaeneeaeeheaeeteaekeeeaee 


ASE 
NOTE E(AC) 


SE* UP THE LOOP ON ERROR ADDRESS. 
SET FIV FIV, AND FD 


SET UP FOR ERROR 

IN CASE THE OVER\ 
UNDER FLOWS FAIL. 
SET ACO OPERAND. 

FSRC 

TEST INSTRUCTION 
GET THE RESULT 


RESULT CORRECT? 

DATA ERROR D 

WAS FPS CORRECT? 
S_ ERROR 


SET UP THE LOOP ON ERROR ADDRESS. 
SET FIV.FIV, AND FD 


SET ACO OPERAND 


FSRC 

ae eee oe 
GET THE RESULT 
IS IT CORRECT 


TST33: SCOPE 
ZEXPONENT DIFFERENCE=57=71 (OCT) FD=1 
MOV #1$. SLPERR 
1$: MOV #3200,R4 
LDFPS RG 
MOV #BBERO,FPVECT 
MOV #8B2, STMP2 
MOV #BBPAT2.RO 
LOD (RO), ac0 
MOV AT 
BB2:  ADDD  (RO),ACO 
STEPS 
B83: MOV ATO,RO 
STD ACO, (RO) 
MOV AT2,R1 
MOV #4,R2 
BBS: CMP (RD)+, (R1)+ 
BEQ BBS 
JMP BBER1 
BBS: SOB R2,BBS 
CMP R4,RS 
BEQ BB6 
JMP BBERO sFP 
ZEXPONENT DIFFERENCE=56=70 (OCT) FD=1 
MOV #1$.SLPERR 
1$: MOV #3200,R4 
LDFPS  R& 
MOV #8B7 ,STMP2 
MOV #BBPAT4 RO 
LOD (RO) ACO 
MOV #BBPAT1 
BB7:  ADDD  (RO),ACO 
STFPS 
MOV #BBDATO,RO 
STD ACO, (ROS 
MOV 10, 
MOV #4 R2 
BB10: CMP (RO) +, (R1)+ 
BEO BB13 
MOV #BBDATO,RO 
MOV #BBPAT4.R1 


ANT (NOT 57) 


121 


“a FPADO Feite FLT 
TES’ @ 33 = ADDF 


SN SN SNS SWS WSS SSW SW SI SW EY 
SOHNE Or 
Ol ee ee ee me me a ee ee ed ed ed ed ed 
NN NN NN NNO 
es 
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et 
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5739 0315 
5740 031576 
5741 031602 
2706 031604 
574 
5744 8 610 
§745 612 
2766 031616 
5747 0 y 
5748 0 
5749 031624 
5750 6 
5751 632 
He 636 
575 ; 642 
5754 644 
378 Ostes9 
2738 3 654 
5758 031656 
5759 031660 
5760 
5761 ; 664 
57 316 
oF88 031900 
5764 031704 
5765 031706 
5 3 
: 
5 
; a 3 

38 

74 40 

75 44 

6 746 
577 750 
5 a 754 
: ree 
a8 031766 


_ ———— em ee we ee ee 
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MACRO 1113 20-OCT-81 08:47 PAGE 51-1 


ADD? wl" ECAC) GREATER THAN E(FSRC) TEST 


sare 


— 
—5 


RS 
N= =] 
NWO NWP 


grt 
S=Ss82 2 


WM = 0 © 


LNW 
NN 


oN NE NUNS 
SERSS 


oo-o--- oO - SC + O00 
&- 
SsaRssesees 
MOO — 10 


=Nononon— 
FON 
ONoo 
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SSC°lSsTx 


0060006 


032312 
032330 


032526 
032536 
000002 


032364 


032526 


032626 
000002 


Osseee 
032566 
000002 


001 
001 


ri— 


Lal 


AO 


8811: 


JMP BBER ;BAD FP 
aad DIFFERENCE=25=31 (OCT) FD=0 


1§: 


BB15: 


BB16: 


6817: 


1§: 


BB21: 


BB22: 


BB23: 


MOV #6.R2 
CMP cRO)+,(R1)+ 
BEO BB12 
JMP R2 
508 R2,BB11 
MP R3 
$08 R2.8B10 
CMP RRS 
BEQ BB14 
0 

MOV #1$,$LPERR 
MOV #8B15,$TMP2 
MOV #BBPATO.RO 
LOD (RO). ACO 
MOV #3000,R4 
LDFPS R4 

V #BBPAT1.RC 
ADDF (RO) ACO 
STFPS RS 
SETD 
MOV #BBDATO,RO 
STD ACO, (RO) 
MOV ATO.R1 
MOV R2 
CMP (RO)+, (R1)¢ 
BEQ 17 
JMP BBER4 
S0B R2,BB16 
CMP 4°R5 
BEO 30 
JMP BBER10 

zEXPONENT DIFFERENCE=24=30 (OCT) 

MOV #1$,SLPERR 
MOV #BB21,$TMP2 
MOV AT3,RO 
LOD (RO) ACO 
MOV #3000. R4 
LDFPS  R& 
MO\ #BBPAT1,RO 
ADDF (RO), ACO 
STFPS RS 
SETD 
MOV #BBDATO,RO 
STD ACO, (RO) 
MOV #BBP7 ,R1 
MOV #2,R2 
CMP (RO)+,(R1)+ 
BEQ BB25 
MOV #BBDATO,RO 
MOV #BBPAT3.R1 
MOV #2.R2 
CMP (RO) +, (R1)¢ 
BEO BB24 


:GET GENERATED 
aoa THE ALIGNMENT 


7 Fl OWS? 

DATA ERROR.D 
;BAD CONSTANT .D 
sFPS CORRECT? 
Ss. 


;SET UP THE LOOP ON ERROR ADDRESS. 
:SET UP ACO OPERAND 

3;SET FIV AND Fiv 

sCLEAR FD 

2s FSRC 

; TEST INSTRUCTION 


sREENTED DOUBLE MODE. 
:GET THE RESULT 


71S THE RESULT 

; CORRECT? 

;DATA ERROR F 
31S FPS CORRECT? 
sFPS ERROR. 


:SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP ACO OPERAND. 
sSET FIU,FIV. CLEAR FD. 


sFSRC 
; TEST INSTRUCTION 


sREENTER DOUBLE MODE 
:GET THE RESULT 


:1S THE RESULT CORRECT? 


;WAS A BAD CONSTANT 
USED (NOT 25) _IN 
>THE ALLIGN FLOWS? 


SEQUENCE 
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“€FRADO FRITFE FL TG PNT PR” A MACRO M1113 20-OCT-81 08:47 PAGE g,18 SEQUENCE 123 
TEST @ 33 = ADDF & ADDED wl" E(AC) GREATER THAN E(FSRC) TEST 









57 1770 0001 7? 0324620 JMP R5 :DATA ERROR F 
é 177% 205 BA24: SOB R2,BB23 
5? 9 1776 137 93236 MP BBER6 :BAD CONSTANT F 
5785 220 BB25: SOB R2,BB22 
5786 0 020605 CMP RRS 
5 1402 BEQ 
57 137 032234 MP BBER10 BAD FPS. 
57 : EXPONENT DIFFERENCE=" 
5 032014 BB26: 
032014 01 737 032022 001110 MOV #1$,S$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5791 0 01 737 032050 001236 1S: MOV 57, $TMP2 
5798 0 12706 003200 MOV #3200.R4 
579 1701 LDFPS R& :SET UP ACO OPERAND 
5794 0 012700 032606 MOV #BBPATS,RO 
5795 0 172610 LOD (RO) ,ACO 
579% 4 012700 032546 MOV #BBPATI_R sFSRC 
5797 032050 172010 BB27: ADDD  (RO).ACO “TEST INSTRUCTION 
5798 0 52 170205 STFPS oR 
5 54 012700 032526 MOV #BBDATO,RO :GET THE RESULT. 
3800 032060 174010 STD ACO, (RO) 
$801 0 062 012701 032646 MOV #BBP11,R1 :1S 1T CORRECT? 
5 ‘ 012702 000004 MOV #4.R2 
032072 022021 BB30: CMP (R0)+,(R1)+ 
5804 0 0014 2 BEQ BB31 
5805 032076 137 032472 JMP BBER7 :DATA ERROR D 
0 102 077205 8831: SOB Re .BB30 
104 020405 CMP R4_R :I1S FPS CORRECT 
5808 032106 001402 BEQ $2 
5809 032110 000137 032214 JMP BBERO 
5810 sEXPONENT DIFFERENCE=100=144 (OCT) 
5811 032114 6B32: 
032114 012737 032122 001110 MOV #1$,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5812 0321 0187 7 032150 001236 18: MOV #9833. STAP2 
13 032130 012704 003200 MOV #3200,R4 
5814 0321 170104 LDFPS :SET FIV.FIV AND FD 
5815 0 186 012700 032616 MOV #BBPAT6.RO -SET UP ACO OPERAND. 
5816 132142 172610 LDD (RO) ACO 
5817 032144 012700 032546 MOV #BBPATI_R :F SRC 
0818 032150 172010 BB33: ADDD (RO), ACO “TEST INSTRUCTION 
1 152 170205 STFPS RS 
5 154 012700 032526 MOV #BBDATO,RO :GET THE RESULT 
1 160 174010 STD ACO, (RO) 
; 032162 012701 032616 MO\ #BBPAT6,R1 :1S IT CORRECT 
0 196 1 As 000004 MOV #4_R 
4 0321 021 BB34: (CMP (RO) +, (R1)¢ 
5 032174 1408 BEO 8835 
6 176 9001 032510 JMP BBERS :DATA ERROR D 
0 205 8835: S08 R i 
0405 CMP R4_R :1S FPS CORRECT 
0 1 2 BNE BBERO 
5 0 10 000137 032656 JMP BBDONE 
1 14 0104 7? 001242 BBERO: MOV R4,$TMPS :FPS ERROR D 
10537 001240 MOV R5.$TMPS 
4 104164 1$: ERROR +164 
5 104413 RSE TUP :GO INITIALIZE THE FPS AND STACK: AND 
“SEE IF THE USER HAS EXPRESSED 


“THE DESIRE TO CHANGE THE SOFTWARE 


H 1 
KFPADO FOTIF FLITG PNT ORT A MACRO M1113 20-OCT-81 08:47 PAGE 2,13 SEQUENCE 124 
"ES* #@ 35 = ADDF & ADDED wi" EAC) GREATER THAN E(FSRC) TEST 


sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
>THE USER TYPED CONTROL G?). 






$835 0 000137 9 JMP BBDONE 
$836 0 010437 001242 BBER10: MOV RG, STMP4 :FPS ERROR F 
$837 032240 010537 MOV RS. STMP3 
6838 032244 104165 1$: ERROR +165 
$839 032266 104413 RSE TUP :GD INITIALIZE THE FPS AND STACK: AND 
“SEE IF THE USER HAS EXPRESSED 
“THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 
= THE USER TYPED CONTROL G?). 
$840 032250 137 03 $56 JMP BBDONE 
§841 032254 012737 032556 001242 SBER1: MOV #BBPAT2.STMP4  :DATA ERROR D 
é 0 $2 012737 032556 001246 MOV #BBPAT2.$TMP 
534 01 737 032546 001240 BBER11: MOV #BBPAT1_$TMP 
5844 76 012737 032526 001244 MOV #BBDATO.$TMP5 
5845 1041 1$: ERROR +166 
$846 0 000137 03 656 jMP BBDONE 
0 12 012737 032576 0012462 ®BBER2: MOV #BBPAT4. STMP4 
5848 012737 032636 001246 MOV #BBP10,$THP6 
5849 6 ? : BR BBER11 
5850 0127 032576 001242 ®BBER3: MOV WBBPATG.$TMP4 =;:BAD CONSTANT D 
51 012737 0 636 0012466 MOV #BBP10, $TMP6 
5 52 032344 01 23? 032546 00124 MOV #BBPAT.STMP3 
5853 032852 012737 032526 001244 V #BBDATO.$TMP5 
54 0 106167 1$ ERROR +167 
55 032362 000535 BR BBDONE 
5856 0 012737 032536 0012462 BBER4: MOV #BBPATO.STMP4 :DATA ERROR F 
585 : 72 01 73? 032536 001246 MOV #BBPATO.$TMP6 
5858 400 012737 03 546 001240 BBERSO: MOV #BBPAT1.$TMP3 
5859 032406 012737 032526 001244 MOV ATO.$TMP5 
5860 032414 104170 1$: ERROR +170 
5861 032416 000517 BR BBDONE 
5862 0324 012737 032566 601242 ®BERS: MOV #BBPAT3.$TMP4 
5863 032426 012737 032626 001246 MOV #BBP7. STMPG 
5864 0324: 000761 BR BBERSO 
5865 032436 012737 032566 001242 BBER6: MOV #BBPAT3.$TMP4 : CONSTANT ERROR F 
5866 032444 01 737 0326 6 001246 MOV #BBP7. STMP6 
586 0 452 012737 032546 001240 MOV #BBPAT1.$TMP3 
$868 032460 012737 032526 001244 V ATO. STMP5 
5869 0 104171 1$ ERROR +171 
5870 032470 000472 BR BBDONE 
$871 0 472 01273: 032606 001242 BBER7: MO\ #BBPATS.$TMP4 
5 re 0 3 12737 032546 001246 MOV #8BPATI1 STHPG 
74 032510 01 37 032616 001242 BBER8: MOV #BBPAT6, STMPS 
75 0 3 6 0127 ? 032616 001246 MOV #BBPATO, STMPG 
8 § 660000 000000 000000 BBDATO: .WORD 0.0.0.0 
?8 006400 000000 BBPATO: D 6400,6.0 =F (AC) = (FSRC) #25=26=32(0CT) 
200 000000 BBPAT1: .wORD  200.6.0.6 *E(FSRC)=1 
016400 000000 BBPAT2: .WORD  16400.0-0.0 *E (AC) =E (FSRC) +57=58=72(0CT) 
1 000000 000000 BBPAT3: .wORD 6200.6.6.6 *E (AC) =E (F SRC) +26=25=31 (OCT) 
1 900000 000000 BBPAT4: .wORD  16200.6.6.0 *E (AC) =£ (F SR6) +56=57=71 (OCT) 
0 00 000000 BBPATS: .WORD 400.0.0.0 *E (AC) =E (FSRC)+1=2 
5 0 031200 900000 000000 BBPAT6: .WORD 31200.0.0.0 “E (AC) =E (F SRC) +100=101=145(0CT) 
5885 006200 1 000000 7: WORD  6200,1.6.6 “BBPAT3 RES 


10 
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TES’ #@ 353 = ADDF 


5 36 

5 

5 032656 
032656 


ADD? wl°W ECAC) GREATER THAN E(FSRC) TEST 


506800 000000 200000 


104473 


—————=- © eee ee —__ — - 


BBP 10: 
ae 


——- — ——- ee - ee 


RSE TUP 


16200.0.0,1 
$90.0.0:0 


SEQUENCE 


;BBPATS RES 
:BBPATS RES 


:GO a A Se be THE FPS AND STACK; AND 
7SEE IF THE Sow HAS EXPP oh t+44 

:THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH — (HAS 
;THE USER TYPED CONTROL G?) 


125 
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KFPADL FRTTE 6. 7G PNT Pre A MACRO M1113 20-OCT-81 08:47 PAGE 52 SEQUENCE 126 
TEST @ 36 = ADDD wlTH NEGA°VE OPRANDS TEST 


SAS6 -SBTTL TEST # 34 = ADDD WITH NEGATVE OPRANDS TEST 


-* SSSR e eee eae eaeaaaeeaeahaetathakeatateereteene 


“eTEST 34 ADDD WITH NEGATVE OPRANDS TEST 
;* 

*eTHIS IS A TEST OF THE ADDD INSTRUCTION 
SeWITH NEGATIVE OPERANDS. EVERY COMBINATION OF 
**QPERAND SIGNS IS TRIED. 

-* 


. 
* "FREAK aRe ete tanakaaeeaneaese 





032660 020006 1S134: SCOPE 
$897 :BOTH OPERANDS NEGATIVE 
5898 03266 DD1: 

0 012737 032670 001110 MOV #1$.SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5899 0326 012704 003200 1$: V #3200,R4 :SET FIO, FIV, AND FD 
5900 032674 17 104 LDFPS R& 
$901 76 012737 032716 001236 MOV #DD2,$TMP2 
590 04 012700 034576 MOV #DDP1.RO :SET ACO OPERAND 
590 710 172610 LDD (RO) .ACO 
3906 0 712 012700 034576 MOV #DDP1 RO Z ESRC 
5905 716 172010 DD2:  ADDD  (RO),ACO “TEST INSTRUCTION 
5906 720 17 205 STFPS RS “GET FPS 
590 722 012700 034556 MOV #DDDATO.RO “GET THE RESULT 
5908 032726 174010 STD ACO, (RO) 
5909 032730 012701 034676 MOV #DDPO_R1 -1S IT CORRECT 
5910 0327 012702 000004 MOV #4 R2 
$911 0 022021 DD3: CMP (RO)+,(R1)+ 
5918 001415 BEOQ DD6 
5913 0 012700 034556 MOV #DDDATO,RO :DID A ADD-SUB 
5914 0 012701 034626 MOV #DDPS RI “FLOW A FAILURE 
5915 0 012702 MOV #4,R2 
5916 0 022021 DDS: CMP (RO)+,(R1)+4 
5917 0 001402 BEQ D5 :216,442,500 
5918 0 000137 034006 JMP DDER1 “DATA ERROR,D 
5919 0 077205 005 S0B R2,DD4 
59 \ 000137 034044 JMP DDE :FLOW FAILURE ,D 
5921 0 220 DD6 SOB R2,DD3 
59 é 03 052704 000010 BIS #10,R4 
59 020405 CMP R4_R5 :FPS CORRECT? 
5924 0 001402 BEQ DD? 
5925 000137 033770 MP DDERO :BAD,FPS 
3926 :AC POS FSRC NEG AC=-F SRC 
5927 033014 bD?: 

14 012737 633022 001110 MO\ #1$,SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 

5928 2 012704 003200 1$: V #3200 ,R4 :SET F10. FIV. AND FD 
38 9 170104 LDFPS R& 
9 012737 033050 001236 MOV #DD8,STMP2 
5931 012700 034606 MOV #DDP2 RO :SET ACO OPERAND 
59 172410 LDD (RO) ACO 
59 4 012700 034576 MOV #DDP1.RO F SPC 
59 30 17 910 DD8: ADDD  (RO).ACO “TEST INSTRUCTION 
5935 ; 52 17 20 STFPS R “GET F 
59 54 012700 034556 MOV #DDDATO,RO -GET THE RESULT 
59 174010 STD ACO, (RO) 
59 12701 034566 MOV #DDPO,R1 :1S IT CORRECT 
59 12702 000004 MOV #4 R2 
5940 02 021 DD10: CMP (RO)+, (R1)+ 
5941 033074 001402 BEOQ DD11 


———— TT ae mw es ee —-+-<s- - - - -_-_—_— - _~— = ~- 
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TEST #@ 34 = ADOD WITH NEGA“VE OPRANDS TE 


OC. Tao TTT TTT TEE TTT, TTT, TTT ttt ———S vee: _ 


594 0 76 000137 034102 JMP DDER3 :FLOw FAILURE 
$94 10 é 5 DD11: SOB R2,DD10 

944 033106 052706 900006 BIS "R4 

$945 119 02 05 CMP R4_RS :FPS CORRECT? 

594 7 1402 BEQ i2 

$947 033114 600137 033776 JMP ERO sBAD FPS 

594 -AC NEG FSRC POS AC=-F SRC 

5949 03 130 DD12: 

120 0127737 033126 001110 MOV #1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

5950 0331 ‘ 012704 003200 1$: MOV #3200,R4 :SET FIU, FIV. AND FD 
$951 1$2 17 194 LDFPS RG 
5952 0 134 012737 033156 001236 MOV #DD13,$TMP2 

595 142 012700 034576 MOV #DDP1_RO :SET ACO OPERAND 
$954 0 166 172610 LDD (RO) .ACO 
5955 033150 012700 034606 MOV #DDP2,RO :FSRC 
5996 0 154 172010 0D13:  ADDD  (RO),ACO *TEST INSTRUCTION 
595 156 170205 STFPS “GET FP 
5958 0 160 012700 034556 MO\ #DDDATO,RO “GET THE RESULT 
595 164 174010 STD ACO, (RO) 
5960 0 166 012701 034566 MOV #DDPO,.R1 :IS IT CORRECT 
5961 033172 012702 000004 MOV #4.R2 
3962 0 176 022021 DD14: CMP (RO)+,(R1)+ 
5963 033200 001402 BEQ DD15 
5964 03 02 000137 034140 JMP DERG :FLOW FAILURE 216,440,121 
5965 033 06 077205 DD15: SOB R2,DD14 
3966 035 10 052704 000004 BIS “R4 
5967 03 314 020405 CMP R4-RS :EPS CORRECT? 
5968 033216 001402 BEQ DDI6 
5969 033220 000137 033770 JMP DDERO :BAD FPS 
5970 sACO POC FSRC NEG /AC/ > /FSRC/ 
5971 033224 DD16: 

0332 4 012737 033232 001110 MOV #1$.SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5972 33332 012704 003200 1$: MOV #3200,R4 :SET FIV. FIV AND FD 
597 03 170104 LDFPS R 
5974 0 40 012737 033260 001236 MOV #DD17,$TMP2 
5975 033246 012700 034616 MOV #DDP3,RO :SET ACO OPERAND 
5976 033252 172410 LDD (RO) ACO 
597 03 54 012700 034646 MOV #DDP6, sESPC 
5978 033260 172010 DD17:  ADDD  (RO).AC -TEST INSTRUCTION 
5979 ; 62 17 205 STFPS RS “GET FPS 
3980 64 012700 034556 MOV #DDDATO,RO *GET THE RESULT 
5981 9 174010 STD ACO, (RO) 

5 0 72 012701 034656 MO\ #DDP7,R1 :1S IT CORRECT 
5 76 12702 MOV #4.R2 

5 022021 DD78: CMP (RO) +, (R1)+ 

5985 04 001415 BEQ 

5 012700 034556 MOV #DDDATO,RO :FLOWS FAILURE 
4 ; 1 01 701 034666 MOV #DDPB,RI *216,440,101 

5 0 16 012702 000004 MOV é *GET GENERATED 
5 2 023 DD19: CMP CRO) +, (R1)+ 

5 4 0014 2 BEQ 0D20 

5991 137 034176 JMP DDERS :DATA ERROR. 
3998 7 205 DD20: SOB R2,DD19 

599 137 634234 JMP DDER6 

5994 0 220 0D21: SOB R2,DD18 

5995 033342 020405 CMP R4-RS5 *EPS CORRECT? 
5996 033344 001402 BEQ DD22 


-——— ee 


$997 033346 
$999 3 ; 
see Hs 
i Sas 
os Sh 
5 02 
6009 0 18 
6010 
6011 4 
gi § 
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on1¢ 44 
ie Sa 
6019 033454 
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5 Sh 
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3 Q 
oR 5 ; 5 
i St 
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6040 56 
6041 60 
sie Ss 
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is Sse 
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033770 


034556 
034666 


034272 
034330 


034556 
034666 
000004 


034556 
034656 
000004 
034366 
034424 


000010 


MACRO 4 


001110 


001236 


001110 


001236 


JMP 
zAC NEG FSRC 


DD22: 
1$: 


DD23: 


DD24: 


DD25: 


DD26: 


DD27: 


ACO 


DD30: 


DD31: 


DD32: 


DD33: 


DD34: 
DD35: 
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SEQUENCE 

DDERN ;BAD FPS 
POS /FSRC/ > /AC/ 
#1$.SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 
#5200.R6 :SET FIO.FIV, ANC FD 
#DD23,$TMP2 

DP6, :SET ACO OPERAND 
(RO) ACO 
#DDP3,RO :F SPC 
(RO) ,ACO *TEST INSTRUCTION 
#DDDATO,RO “GET THE RESULT 
ACO, (RO) 
#DDP7.R1 :1S IT CORRECT? 
#4 R2 
(RO) +, (RI) 
#DDDATO,RO :FLO.S FAILURE 
#DDPB,RI “CONSTANT (NOT 57) 
4,R2 =216,042,101 
(RO). (R1) 

D26 
DDER7 :DATA ERROR. 
R2,DD25 

DERB 
R2,DD24 

4-R5 :FPS CORRECT? 
DD30 
DDERO :BAD FPS 
FSRC NEG /AC/</FRSRC/ 
#1$,$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
#5200,R4 :SET FIO.FIV.AND FD 
#DD31,$TMP2 
#DDP4.RO :SET ACO OPERAND 
(RO), ACO 
#DDP5.R FSPC 
(RO) ,AC TEST INSTRUCTION 
#DDDATO RO -GET THE RESULT 
#DDPB,R1 :IS IT CORRECT 
#4,R 
(RO)+, (R1)+ 

;ADD-SUB 

#DDDATO,RO *FLOWAS FAILURE 
#DDP7,RI1 “CON 216 N440 NOT 141 
#4,R2 “GET GENERATED 
(RO) +, (R1)+ “FOR THE ALLIGNMENT 
DD34 :FLOWS? 
DDERS *DATA ERROR, D 
R2,DD33 
DDER10 
R2,DD32 
#10,R4 


me es eee ee ma eae ee 
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B8e Bees 
ee0cce © 


tater 


Ooooco°0oeo 
WANNA 

™“s 

SSaNaSS 


85 S713 
6071 714 
on? 6 720 
607 724 
6074 033730 
6075 033732 
6076 7 

607 740 
one 33742 
6079 03 68 
6080 03375 

oa Sus 
608 ; 760 
6084 4 
6085 33774 
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SSENTSSRS 
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TEST #@ 34 = ADDD wITH NEGA’VE OPRANDS TE 


033770 


6 
034676 
034706 
034576 
034606 
034556 
034566 


MACRO M1 


001110 


001236 


a] 7 
a 20-OCT-81 08:47 PAGE S2- 


DD37: 


DD38: 


i 
DDERO 
FSRC POS 
At SLPERR 


32600,R4 
RS 
#DD37,$TMP2 
#DDP5._RO 


#DDDATO,RO 
ACO, (RO) 
#DDPB,R1 

#4 .R2 
(RO)+,(R1)+ 
DD4 
#DDDATO,.RO 
#DDP7.RI 
#4_R2 

(RO) +, (R1)¢ 


#DDP1,$TMP3 
#DDP1,$STMP4 
#DDDATO, $TMP5 
#DDP9, STMP6 
DDDONE 


#DDP1 ,STMP3 
# MP4 


4#DDP1,$TMP3 
4#DDP2, STMP4 
#DDDATO,STMP5 
4#DDPO,STMP6 


sFPS CORRECT? 


:BAD FPS 
JFSRC/</AC/ 


sSET UP 


mm rr te - we ee et 


THE LOOP ON ERROR ADDRESS. 
sSET FIO, FIV, AND FD 


;SET ACO OPERAND 


sFSPC 
sTEST INSTRUCTION 
-GET FP 


2G 
:GET THE RESULT 


IS IT 


sADD S$ 
7FLOWS 
:GET 2 


3FOR THE ALLIGNMENT 


CORRECT 


UB 
FAILURES 


E I 


FLOWS? 
DATA ERROR. D 


;BAD C 


sFPS C 


ONSTANT .D 


ORRECT? 


:BAD FPS 


sFPS E 


RROR 


SEQUENCE 
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034706 
Sie 
034866 
034706 
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MACRO ™ 
TEST # 34 = ADDD WITH NEGA VE OPRANDS T 


1§: 
DDERS: 


1$: 
DDERS: 


1$: 
DDER6: 


1$: 
DDER7: 


1$: 


DDERB: 


18: 


DDERSY: 


18: 


DDER10: 


1$: 


DDER11: 


1$: 


N10 
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#274 
DDDONE 


#DDP2 ,STMPS 
#DDP1,STMP4 
#DDDATO,$STMPS 
#DDPO ,STMP6 


+ 
DDDONE 


#DDP6,STMP3S 
#DDP3,STMP4 
#DDDATO,STMPS 
#DDP7 ,STMP6 
+165 


DDDONE 
#DDP6,STMP3 
#DDP3S,STMP4 
#DDDATO,STMPS 
P7,STMP6 
DDDONE 
#DDP3,S$TMPS 
#DDP6.STMP4 
#DDDATO,$TMPS 
#DDP7 ,STMP6 
+165 
DDDONE 
#DDP3,STMP3 


#DDPS ,STMP3 
#DDP4 ,STMP4 
#DDDATO,$TMPS 
#DDP8B,STMP6 
+165 

DDDONE ‘ 
#DDPS ,STMPS 


#DDP4, STMP3 
#DDP5, STMP4 
#DDDATO, STMPS 
#DDPS,STMP6 


+165 


SEQUENCE 
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AOPAPOHSPCOCOV A 


~~ 


OOO’ oer 


QOOOOOOO0o000 


- 6e° 


‘6 6. °C 
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ENT Pa” & 

034706 
2 6 
ais 
sis 
034666 
0347 


000000 
900000 
00000 
000000 


MACRO mrs 20-00 T-8' 08:47 PAGE BN 5 
- ADDD wl’ NEGA VE OPRANDS TES 


40 
1262 
001264 
001246 


DDER 2: 


1§: 


DDDATO: . 


DDDONE 
#DDPS .STMPS 


#DDPS ,STMP4 
#DDDATO,STMPS 


#DDPB,STMP6 
+204 

DDDONE 
360200 0,0.0 


00,0500, 


SEQUENCE 


sFRAC=...17 
;FRAC=...1 


;DDP3+DDP6 


:DDP5 +DDP4 
:DDP1+DDP1 


:GO INITIALIZE THE FPS AND STACK; 
sSEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH —_— (HAS 
; THE USER TYPED CONTROL G?) 


AND 
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"ES’ @ 35 = SLBD “ES” 
6120 .SBTTL TEST # 35 = SuBD TEST 


“*@S@Seeeeeee eee eeeeeeeeeeseeeeeeeeaeeeeteteeeneeeeeneeeteeeneeerneeneee 


[eTEST 35 SUBD TEST 

-* 

te THIS IS A TEST OF THE SUBD INSTRUCTION. 
:e BOTH A POSITIVE AND A NEGATIVE NUMBER 
** JS SUBTRACTED FROM IT SELF 


*-*S2@Geeeeeeeeeeeeeaeeeeeeeeeeeeaeeeeeeaeeeenaeaeageeaeeeeeeteeeeetaenese 


036710 00006 75135: SCOPE 
6121 : USE POSITIVE OPERANDS 
6122 03471 EET: 

034712 012737 034720 001110 MOV #1$ SLPERR 7SET UP THE LOOP ON ERROR ADDRESS. 
6123 034720 012706 003200 1$: V #3200,R4 :SET FIO. FIV, AND FD 
126 0 724 1701 LDFPS RG 
6125 636726 012737 0346746 001236 MOV #EE2, STMP2 
61 ¢ 0 734 012700 035432 MOV #EEP RO :SET ACO OPERAND 
61 740 172610 LDD (RO) .ACO 
61 0 742 012700 035432 MOV #EEPI RO =F SPC 
61 746 173010 FE2: SUBD (RO) ACO “TEST INSTRUCTION 
61 0 75 170205 STFPS RS “GET 
6131 752 012700 035410 MOV #EEDATO.RO -GET THE RESULT 
61 ‘ 034756 174010 STD ACO, (RO) 
6133 034760 4 01 035420 MOV #EEPO.R1 :1S IT CORRECT? 
6134 0347 12702 000004 MOV #4_R 
6135 0347 02 021 EES: CMP (RO)+,(R1)+ 
6136 03477 1615 BEQ E 
6137 034774 012700 035410 MOV #EEDATO.RO :DID A BAD 
6138 035 012701 035442 MOV #EEP2,R1 *CONSTANT (NOT 57) 
61 ; 012702 000004 MOV #4_R :GET GENERATED 
6140 19 02 021 EES: CMP (RO) +, (R1)+ 7FOR THE ALLIGNMENT 
6141 3 1 1408 BEQ EES > FLOWS? 
6142 035014 000137 035220 JMP EEER1 “DATA ERROR.D 
614 9 30 Q 77205 EES: S0B R2, EEG 
6144 137 035256 MP EEER2 :BAD CONSTANT.D 
6145 0 ¢ 0 EE6 $08 R2,EE3 
6146 0527 000004 BIS 
614 0 02 5 CMP :FPS CORRECT? 
6148 03 402 BEQ ? 
6149 0 0001 035202 JMP EEERO ;BAD FPS 
ef + 035046 ne? USE NEGATIVE OPERANDS 

$044 012737 35052 001110 MO\ #1S. SLPERR :SET UP THE LOOP ON ERROR ADDRESS. 

$136 : 52 018706 353000 1$: 1 #3200,R4 >SET FIO, FIV. AND FD 
6154 035 012737 035100 001236 MOV #EES.STMP2 
6135 01 035452 MOV #EEPS RO :SET ACO OPERAND 
61 ¢ 5 17261 LOD (RO) ACO 
61 5074 01 700 035452 MOV #EEPS, :F SPC 
61 : 3100 17301 EES: SUBD (RO), ACO :TEST INSTRUCTION 
61 51 17 205 STFPS oR “GET F 
6160 035104 01 035419 MOV #EEDATO RO “GET THE RESULT 
6161 3110 17401 STD ACO, (ROS 
616¢ 511 01 1 035420 MOV #EEPO,R1 :1S IT CORRECT? 
616 3136 12702 000004 MOV #4 R2 
6164 312 08 021 FES: CMP ~—s (RO) +, (R1)+ 
6165 035126 001415 BEQ EE12 


> 11 
EPADO FRTTE FL1G PNT PAT A | MACRO MITTS 20-OCT-81 08:47 PAGE 53-1 SEQUENCE 133 





"EST @ 35 = SUBD TEST 
$196 2 51 ¢ 01 5410 MOV #EEDATO.RO :DID A BAD 
6167 0351 612701 5462 MOV #EEPS RI “CONSTANT (NOT 57) 
0198 | 1 072702 OV #4,R2 :GET GENERATED 
616 14 02 027 EE10: CMP (RO)+,(R1)+ -FOR THE ALLIGNMENT 
6170 0351 4 4 BEQ EET] sFLOWS? 

6171 0357 0001 035314 JMP EEER3 “DATA ERROR.D 
6172 935152 077205 FE11: SOB R2,£E10 
41? 3] 9001 7 035352 JMP EEERS ;BAD CONSTANT.D 
6174 035160 0 52 0 EE12: SOB R2,EE9 
6175 0351 52 000006 BIS #4 “RG 
0176 51 0405 CMP R4_RS sFPS CORRECT? 
617 0 51 14 ; BEQ EE13 
6178 0351 1 035202 JMP EFERO :BAD FPS. 
6179 035176 000137 03547 EE13: MP EEDONE 
61 5 010437 001242 FEERO: MOV R4,STMPS sBAD FPS 
6181 035 010537 001240 MOV RS. $TMP3 
61 5 104005 1$ ERROR + 
6185 035 000137 035472 jMP EEDONE 
6184 035 EEERT: 
035 012737 035432 001240 MOV #EEP1STMP3 
035 012737 035432 001242 MOV #EEP1.STMP 
035 012737 035410 001244 MOV #EEDATO, STMPS 
035 012737 035420 001246 MOV #WEEPO, STMPG 
035 194206 1$: ERROR + 
035 000137 035472 JMP EEDONE 
6185 035 EEER2: 
035 012737 035432 001240 MOV #EEP1,STMP3 
035 012737 035432 001242 MOV #EEP1.STMPG 
035 012737 035410 001244 MOV #EEDATO, STMPS 
035 012737 035420 001246 MOV #EEPO,STMP6 
035 104207 1$: ERROR +207 
035 000137 035472 jMP EEDONE 
6186 035 EEER3 
035 012737 035452 001240 MOV #EEP3.STMP3 
035 012737 035452 001242 MOV #EEPS.STMPG 
035 30 012737 035410 001244 MOV #EEDATO, $TMPS 
035 012737 035420 001246 MOV HEEPO. STAPC 
035 104206 1$ ERROR +206 
035 000137 035472 JMP EEDONE 
6187 035 EEER4 
035 012737 035452 001240 MOV #EEP3. STMP3 
035 012737 035452 001242 MOV #EEPS. STMPS 
035 012737 035410 001244 MO\ #EEDATO, STMPS 
035374 012737 035420 001246 MOV wee ; 
035402 104007 1$ ERROR +207 
035404 000137 035472 JMP EEDONE 
6188 035410 000000 000000 000000 EEDATO: .WORD 0.0.0.0 
6189 035420 000000 000000 000000 EEPO: .WORD 0.0.0-0.0 
6190 035432 000200 000000 000000 EEP1: WORD 200.0.0.0 
6191 0 5442 000400 000000 000000 EEP2: -WORD 400.0.0.0 
6192 35452 100200 000000 000000 EEP3: :woRD 100206.6.0.90 
619 0354 100400 000000 000000 £EP4: :wORD  100400.0.0-0 
6194 0354 EEDONE : 
03547 104413 RSE TUP 


:GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 


EC OTE TS Te 


15 PAD, 
"s<c° 2 2 


cP°°6 6. 7G ENT OR” A 
5 = SUBD "ES! 
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THE USER TYPED CONTROL G?). 


SEQUENCE 


134 
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TEST @ 36 = NCUMALIZE ALGOOITHM TEST 


6206 .SBTTL TEST # 36 - NORMALIZE ALGORITHM TEST 
JF FTAA AHA ae leases aegaeeeeeeeeeeeeaaeeeaaeadtangeenkarneeasaeanesateaneee 
TeTEST 36 NORMALIZE ALGORITHM TEST 
:e THIS IS A TEST OF THE NORMALIZE 
:* FLOW ALGORITHM. TwO PATTEPNS ARE USED, 
:* FIRST THE MINIMUM SITUATION REQUIRING ONE 
>* LEFT SHIFT AND THEN THE MAXIMUM SITUATION 
>* REQUIRING 56 SHIFTS. 
PETIT TIT I TTI Titi tit Tiiiititiiitiiiiiiiiiitiiiiiiitiiiit 
035476 900006 1ST36: SCOPE 
6205 stinsian Use DATA PATTERNS THAT REQUIRE ONLY ONE LEFT SHIFT TO NORMALIZE 
035476 012737 035504 001110 MOV #1$,S$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
7? 035506 012706 003200 1$: MOV #3200,R4 :SET FIO. FIV, AND FD 
0 5510 170104 LDFPS R& 
5512 012737 035532 001236 MOV #FF2,$TMP2 
10 035520 012700 036030 MOV #FFP2 RO :SET ACO OPERAND 
11 035524 1724610 LDD (RO). ACO 
12 035526 012700 036040 MOV #FFPS,RO FSPC 
13 035532 172010 FF2: ADDD  (RO),ACO “TEST INSTRUCTION 
14 035534 17 205 STFPS OR “GET FPS 
15 035536 012700 036000 MOV #F FDATO,RO =GET THE RESULT 
. 16 035542 174010 STB ACO, (RO) 
17 035544 012701 036050 MOV #FFP4, R1 :1S IT CORRECT 
18 035550 012702 0000 MOV #4,R2 
6219 035554 02 021 FF: CMP (RO) +, (R1)+ 
0 035556 1401 BEQ FFG 
10 3560 900470 BR FFER2 :BAD DATA 
; 035562 077204 FFG: S0B R2,FF3 
035564 020405 CMP R4_RS :FPS CORRECT? 
4 035 1401 BEQ FF 
§ 035570 000437 ae FFERO :BAD FPS 
[USE DATA PATTERNS WHICH REQUIRE 56 LEFT SHIFTS TO NORMALIZE 
>THE RESULT 
8 035572 FS: 
035572 012737 035600 001110 MOV #1$.S$LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
035600 012704 003200 1$: MOV #3200,R4 -SET FIU. FIV, AND FD 
035604 17 194 LDFPS RG 
1 035606 012737 035626 001236 MOV #FF6.STMP2 
035614 012700 036010 MOV #FEPOLR :SET ACO OPERAND 
- 0 1724610 Lor (RO) ACO 
2 012700 036020 MOV #FFPT.RO F SRC 
5 6 172010 FF6: DDD _—s (RO) AC “TES? INSTRUCTION 
0356 170205 STFPS “GET FP 
035632 012700 036000 MOV #FFDATO,RO “GET THE RESULT 
0 3636 174010 STD ACO, (RO) | 
035640 012701 036050 MOV #FFP4 RI :IS IT CORRECT 
40 035644 012702 000004 MOV #&,R2 
41 035650 021 FF?: CMP (RO)+,(R1)+4 
6 035652 1401 BEQ FF10 
4 0 5654 13 BR FFERI :BATA 
44 0356 204 FF10: SOR R2,FF7 
45 03 020405 CMP R4_RS :FPS CORRECT? 
6246 035662 1401 BEQ FFI 
6247 035664 000401 BR FFERO :BAD FPS 


=——_ —_—- o ——— 


“«FPADO FRITE ELIG PNT PRT A 
TES’ @ 56 = NCRMALIZE ALGOO!THM TEST 


~8 035666 


SF 
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R 
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S 


oo 
™~ 





OoOooo0o0oo°o 
333 
oo 


—_— «— « 
MINIM! 2 
= NNN™N 


A= wa 


NO NNNN 


rmrnnr 


—OOoOo 
-—— ss 


® 
=MUNNN™ 


WW AWA 


NONNN™N 


~-O-Oo0O 
3 
sss 


11 
MACRO ™1113 20-OCT-81 08:47 PAGE got) 


FFI1: BR 
FFERO: MOV 
MOV 
1§: ERROR 
BR 
FFERI: 
MOV 
MOV 
MOV 
MOV 
1$: ERROR 
JMP 
FFER2: 
MOV 
MOV 
MOV 
MOV 
1$: ERROR 
JMP 
FFDATO: .WORD 
FFPO: . WORD 
FFPI: . WORD 
FFP2: . WORD 
FFPS: . WORD 
FFP4: . WORD 
FFD 
TS737 


FF DONE 
R5.STMP3 


#FFPT.STMPS 
#FFPO,STMP4 
#FFDATO,STMPS 
#FFPS .STMP6 
+210 

FF DONE 


#FFPS,STMP3 
#FFP2,STMP4 
#FFDATO,STMPS 
are ewe 


SFFOG=FFPO+FFRPI=FFPS+F FPG 


SEQUENCE 


136 


SESESES RESTS SSE SSE SS 


SEERRROSSOOSRaS 


me ewe ee a ad ed ad = od 2. od ed 


mronrera 


SOPO FORD BRS 


cc ee re — ~— 


Soe 
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-SBTTL END OF PASS ROUTINE 


“SSSR eeegeacgaeaaeeekeaaeeaeeaeenetanekeraeaetaeenee se 


: INCREMENT THE PASS NUMBER (S$PASS) 

:* INDICATE END-OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAY 
;*1F SWi2=1 INHIBIT TRACE TRAP 

;*IF THERES A MONITOR GO TO IT 

;*IF THERE ISN*T JUMP TO LOOP 


cgEEE 





SEP 
SCOPE 
CLR $TSTNM :: ZERO THE TEST NUMBER 
CLR STIMES ::Z2ERO THE NUMBER OF ITERATIONS 
INC SPASS =: INCREMENT THE PASS NUMBER 
7 BPL 1000$ CH IF STILL PLUS = DPMO02 
? CLR SPASS “CLEAR THE PASS COUNTER = DPMOO2 
4 INC $PASS2 > INCREMENT OVERFLOW PASS COUNTER = DPMOO2 
10 7 1000$: DEC (PC)+ >: LOOP? 
12 1 SEOPCT: .WORD 1 
14 2 BLE 999$ :NO - DPMOO2 
16 JMP SDOAGN > YES 
2 ? 999$: MOV (PC)+,a(PC)*+  ::RESTORE COUNTER 
4 1 SENDCT: .WORD 1 
6 0 ¢ SEOPCT 
0 0057 ST SERTTL :SEE IF ANY ERRORS THIS PASS 
34 1007 5C00$ :SRANCH IF SO TO PRINT THE EOP 
36 005737 036512 TST EPENDS :SEE IF EOP MSGS ARE DISABLED 
4 001120 BNE $GET42 :BRANCH IF SO 
44 032737 000003 001324 BIT #3, $PASS sPRINT EOP EVERY 4TH PASS 
32 001114 — BNE $GET42 “BRANCH IF NOT MULTIPLE OF 10 
54 104401 036162 TYPE ,058 i: TYPE ASCIZ STRING 
60 000407 BR 64$ T OVER THE ASCIZ 
. 53958: "ASCIZ <12><15>/END PASS # / 
88 005737 036514 TST SPASS2 :SEE IF OVERFLOW HAS NON-ZERO VALUE :DPMOO2 
0 001440 BEQ 4900$ “BRANCH IF ZERO 
06 013746 036514 MOV SPASS2,-(SP) ::SAVE $PASS2 FOR TYPEOUT 
;3TYPE OVERFLOW PASS NUMBER IN OCTAL = DPMO02 
12 104403 TYPOS 7GO TYPE--OCTAL ASCII 
14 006 BYTE 6 :3 TYPE 6 DIGITS 
15 900 .BYTE 0 : SUPPRESS LEADING ZEROS | 
18 005 001324 TST SPASS -SEE IF PASS COUNT IS ZERO :DPMO2 
001007 BNE 3000$ “BRAN CH IF NOT > DPMOO2 
4 104401 036232 TYPE 67$ >: TYPE ASCIZ STRING 
0 000403 aR 66$ ::GET OVER THE ASCIZ 
: i678: -ASCIZ 100000! 
4 ‘ BR 4910$ :GO TEST $ERTIL : DPMOO2 
42 012737 070000 001244 3000$: MOV #70000.$TMPS5 § :CHECK 5TH OCTAL DIGIT FIRST : DPMOO 
50 033737 001244 001324 40C0$: BIT STMP5 ,SPASS -CHECK TO SEE IF OCTAL DIGIT IS ZERO  :DPMOO2 
56 001013 BNE 4900$ : CH OUT IF ZERO : DPMOO2 
104401 036266 TYPE ,69$ :: TYPE ASCIZ STRING 
000401 BR 68$ ==GET OVER THE ASCIZ 
» jig? eASCIZ :0:! 
70 006237 001244 ASR STMP5S :SHIFT THE THREE BITS RIGHT 3 PLACES  ;:DPMOO 
74 006237 001244 ASR STMP5 $ :DPMOO 


— ee ee ee —_—_ ee ee ee ee 


Bo 


_— 
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eees ie 
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Nm 
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«SDADO FRITE FLTG PNT 
> OF PASS ROUTINE 
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PR” A 


0061244 


001324 


000020 
010000 
036504 


000020 
036500 


377 
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ASR STMP5 
4000$ 
4900$: ; 
MOV SPASS,-(SP) 
TYPOS 
BYTE 6 
-—BYTE 0O 
4910$: TST SERTTL 
BEQ 5001$ 
TYPE 71$ 
BR 70$ 
gazt®- eASCIZ / TOTAL ERRORS 
MOV SERTTL,-(SP) 
TYPOS 
-BYTE 6 
BYTE 
LR SERTTL 
5001$: TYPE -SCRLF 
$GET42: MOV a442,R0 
BEQ SDOAGN 
CLR - (SP) 
MOV #$CLR.T,-(SP) 
BR SRTRN 
SCLR.T: 
MOV a@442,R0 
EQ SDOAGN 
RESET 
SENDAD: JSR PC, (RO) 
NOP 
NOP 
NOP 
SDOAGN: 
TRAP 
BIC #20, (SP) 
142462 BIT #BIT12,aSWR 
BNE 1$ 
COM STBIT 
BMI 1$ 
BIS. #20, (SP) 
: MOV #$LO0P,-(SP) 
SRIRN: RTI 
$LOOP 
JMP a(PC)+ 
SRTINAD: .WORD LOOP 
S$TBIT: .WORD 0 
000 S$ENULL: .BYTE <=-1,-1,0 
-EVEN 
EPENDS: .WORD 0 
SPASS2: .WORD 0 


SEQUENCE 


: 2 Dems 
sBRANCK BACK TO CHECK $PASS :DPMOO0 


;sSAVE SPASS FOR TYPECUT 
NUMBER 


77 TYPE PASS IN OCTAL 
3:60 tite ASCII 
>: TYPE 6 IT 


DIGITS 
:;SUPPRESS LEADING ZEROS 
; SEE IF ANY ERRORS THIS PASS ; DPMOO02 
ANCH AROUND REPORT IF NONE ; DPMO02 
i TYPE ASCIZ STRING 
:GET a", THE ASCIZ 
THIS PASS / 


+3 SAVE SERTTL FOR TYPEOUT 
;; TOTAL NUMBER OF ERRORS IN OCTAL 
::G0 TYPE=-OCTAL ASCII 
;- TYPE 6 DIGITS 
+ 2 SUPPRESS LEADING ZEROS 
OR TOTAL 


CLEAR ERR 
: TYPE CARRIAGE RETURN, LINE FEED 
:GET MONITOR ADDRESS 

:BRANCH IF NO MONITOR 
i} INSURE THE oT BIT IS CLEAR 

ETUP FOR AN RTI OR R 
$3G0.DO AN RTI_OR RIT. 10 LOAD THE PSw 


ssWITH A CLEARED ‘'T’’ BIT 
: ioe i CONTAINS THE MONITCRS 
TURN ADDRESS 


7z;PUSH OLD PSwW AND PC ON STACK 
: CLEAR THE ‘’T’’ BIT 
7 RUN TRACE TRAP? 


:31S IT TIME FOR TRACE TRAP 


CE TRAP 

£3 JUMP TO START OF TEST 

+6 pA mere be IS CHANGED TO 
"RIT IF “RTT IS A LEGAL 

: INSTRUCTION 


3: ;RETURN 


:2°'T'' BIT STATE INDICATOR 
;sNULL CHARACTER STRING 


:LOCATION FOR EOP PRINT FLAG 
:LOCATION FOR PASS COUNT OVERFLOW 


:DPM002 
:DPMO02 


138 
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SCOPE MANDLER ROUTINE 


6271 -SBTTL SCOPE HANDLER ROUTINE 


IPTC iiiiiiiiiiiiiiiiiiisiiiiiitii is 
“STHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (PISPLAY<7:0>) 
;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 
<THE SWITCH wit oe that” BY THIS ROUTINE ARE: 


> #SW14=1 LOOP ON TEST 
> #SW11=1 INHIBIT ITERATIONS 
> #SWO9=1 LOOP ON ERR 
> > rgh LOOP ON TEST IN SWR<7:0> 
;* SCOPE 3; SCOPE=I0T 
036516 105777 142422 $SCOPE: TSTB  a$TKS :1S A CHARACTER WAITING? = DPMO02 
9369 21 BPL 000$ “BRANCH IF NOT = DPMOO2 
036524 013737 001146 001244 MOV $TKB,STMP5 ;WASTE THE CHARACTER, CLEARING READY ;DPMOO2 
036532 005737 036512 TST EPENDS ;SEE WHICH STATE ENABLE/DISABLE IS IN :DPMOO2 
036536 001017 BNE 8000$ :BRANCH IF EOP'S DISABLED - DPMOO2 
036540 005237 036512 INC EPENDS “SET FLAG DISABL ING PRINTOUTS : DPMOO2 
036544 104401 036552 TYPE .65$ i: TYPE ASCIZ STRING 
036550 000411 BR 4$ “GET OVER THE ASCIZ 
::65$: .ASCIZ <CRLF>!EOP'S DISABLED! <CRLF> 
036574 64$: 
036574 000415 BR 90008 :SRANCH OVER ENABLE ROUTINE sDPMOO2 
036576 005037 036512 8000$: CLR EPENDS “CLEAR FLAG ENABL ING PRINTOUTS = DPMOO2 
036602 104401 036610 TYPE 67$ ii TYPE ASCIZ STRING 
036606 000410 BR 66$ :GET OVER THE asciz 
::67$: .ASCIZ <CRLF>!EOP'S ENABLED!<CRLF> 
036630 : 
036630 9000S: 
036630 104407 CKSWR :TEST FOR CHANGE IN SOFT-SWR 
036632 032777 040000 142300 1$: BIT #B1T14,aSWR ;;LOOP ON PRESENT TEST? 
036640 001131 BNE SOVER “VES IF SW14=1 
-#HMMASTART OF CODE FOR THE XOR TeSTERaeane 
036642 000416 $XTSTR: BR 6$ STF RUNNING ON THE SXOR’* TESTER CHANGE 
*: THIS INSTRUCTION TO A "NOP’’ (NOP=240) 
036644 013746 0 MOV a#ERRVEC, gu (SP) :SAVE THE CONTENTS OF THE ERROR VECTOR 
036650 012737 000004 MOV #5$, a#ERRVEC SISET FOR TIMEOUT 
036656 005737 177060 TST a#177060 ME OUT ON XOR? 
036662 012637 000004 MOV (SP) +, a#ERRVEC : :RESTORE THE ERROR VECTOR 
036666 00 BR SSVLAD TO THE NEXT TEST 
0366 26 S$: CMF (SP) +, (SP)+ i: CLEAR THE STACK AFTER A TIME QUT 
036672 012637 000004 MOV (SP) +, a#ERRVEC : RESTORE THE ERROR VECTOR 
036676 0 7$ ON THE PRESENT TEST 
36 6$::##HAMEND OF CODE FOR THE KOR’ tESTERMAMAS 
036700 032777 000400 142232 BIT #B1T08,aSwR ::LOOP ON SPEC. TEST? 
036706 001404 BEQ *: f 
036710 1 7 ; 142224 001102 CAPS aSuR .STSTNM ;30N THE RIGHT TEST?  SwWR<7:0> 
0367 o137 7? 177766 037142 28: MOV 177766, CPSAVE “MOVE CPU ERR REG VALUE TO LOC FOR TST ;:DPMOO1 
0367 32737 000001 037142 BIT #WBITOO.CPSAVE :SEE IF THE POWER MONITOR BIT IS ON = DPMOO01 
367 0014 BEQ 2000$ *BRANCH TO CONTINUE ROUTINE IF CLEAR  :DPMOO1 
0367 0427 000001 177766 BIC #81100, 177766 “CLEAR THE BIT FOUND TO BE SET = DPMOO1 
036744 104177 ERROR +177 *CALL SPECIAL POWER FAIL BIT ERROR CALL ;DPMOO1 
036746 105037 001103 CLRB = SERFLG ‘CLEAR THE ERROR FLAG FOR NEXT TEST -DPMO01 
036752 105737 001103 2000$: TSTB  $ERFLG =:HAS AN ERROR OCCURRED? 


75 
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PR” A 

BEQ 3$ 
001115 001103 — SERMAX ,SERFLG 
001000 142142 a #B1T09 ,aSwR 

a 

001110 001106 7$: MOV SLPERR,SLPADR 

BR SOVER 
001103 4$: CLRB SERFLG 
007302 i _ 
004000 142110 3$: ait Sst 1 OSue 
001324 TST SPASS 

BEQ 1$ 
001104 INC SICNT 
001302 001104 CMP STIMES,SICNT 

BGE SOVER 
ooo? 001104 1$: MOV #1,$ICNT 
037140 001302 MOV SMXCNT, .STIMES 
001102 $SVLAD: INCB STSTNM 
001102 001322 MOVB STSTNM,STESTN 
001106 MOV (SP) , SLPADR 
001110 MOV (SP) ,SLPERR 
001304 CLR SESCAPE 
000001 001115 MOVB #1,SERMAX 
001102 142010 S$OVER: MOV STSTNM,@DISPLAY 
001106 ari SLPADR, (SP) 

SMXCNT: 1 
CPSAVE: .WORD 0 


SEQUENCE 

;BR IF NO 
:IMAK. ERRORS FOR THIS TEST OCCURRED? 
; LOOP ON ERROR? 
7: SET LOOP ADDRESS TO LAST SCCPE 
32ZERO THe ERROR FLAG 
7;CLEAR T 4 NUMBER Y ITERATIONS TO MAKE 
sz; ESCAPE TO THE NEXT TEST 
sc INHIBIT ITERATIONS? 
3;BR IF YES 
:31F FIRST PASS OF PROGRAM 

INHIBIT ITERATIONS 
: 3 INCREMENT ITERATION COUNT 
+2 CHECK THE wo OF ITERATIONS MADE 
IF MORE ITERATION REQUIRED 

* :REINITIALIZE THE ITERATION COUNTER 
e3SET NUMBER OF ITERATIONS TO DO 

:: COUNT TEST RS 
>: SET TEST NUMBER IN APT MAILBOX 
3zSAVE SCOPE LOOP ADDRESS 
7: SAVE ERROR LOOP ADDRE 
;;CLEAR THE ESCAPE FROM ERROR ADDRESS 
sé Y ALLOW ONE(1) ERROR ON NEXT TEST 
fh ge TEST NUMBER 

4 | om ADDRESS 
7 :MAX. NUMBER OF ITERATIONS 
=LOCATION TO SAVE CPU ERR REG CONTENTS ;DPMOOT 


140 
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FRITF FL TG ENT BR” A 
ERROR HANDLER ROUTINE 
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001116 
141630 


001336 
037344 


141542 


-SBTTL ERROR HANDLER ROUTINE 


PIP iitiiiiiiitiviiiii iis 
“STHIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
; *SAVE ig A RY ohath AND THE ADDRESS OF THE ERROF CALL 


;*AND GO T ON 
SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
= HALT ON ERR 


; * THE 


IBSAVE : 
SERROR: ; 


7$: 


1$: 


1000$: 


20$: 


21$: 


22$: 
2$: 


3$: 


INHIBIT ERROR TYPEOUTS 
ERROR 


LOOP ON ERROR 
N ; sERROR=EMT AND N=ERROR ITEM NUMBER 
0 ;LOC*N TO HOLD SITEMB DURING DUAL ERR 
IBSAVE : CLEAR a ITEM BYTE SAVE LOCATION 

7; TEST FOR Nog IN SOF T=SWR 
SERFLG 23 SET THE ERROR FLAG 
7$ ON'T LET THE FLAG GO TO ZERO 
STSTNM,@DISPLAY ;:DISPLAY TEST NUMBER AND ERROR FLAG 
hha : seek — 
poeeel : FRING Rat 


SERTTL 
(SP), SERRPC 
#2, $ERRPC 
aSERRPC $ITEMB 
#177, SITEMB 


1000 
177766, CPSAVE 
acre cr eae 


0 
#B81T00,177766 
SERRPC , IBSAVE 
+177 


IBSAVE , SERRPC 

#B1T13,aSWR 

PC,ERTYPE 
CRLF 


#APTENV, SENV 
Lin 2 ‘hg 
PC,$AT 

0 

22$ 

- 

aSwR 

3$ 


#B1T09,aSWR 
4$ 


T THE NUMBER OF ERRORS 
::GET ADDRESS OF ERROR INSTRUCTION 


:;STRIP AND SAVE THE ERROR ITEM CODE 
sSEE IF THIS IS THE POWER FAIL CALL 
;BRANCH AROUND PMB TEST IF IT IS 
sMOVE CPU ERR REG TO CPSAVE FOR TEST 
;SEE IF POWER MONITOR BIT IS SET 
:BRANCH IF OK 

;CLEAR THE BIT FOUND SET 

sSAVE SERRPC 


ERR 
:CALL SPECIAL POWER MONITOR BIT ERROR 
;RESTORE SERRPC 


;sSKIP TYPEOUT IF SET 
:;SKIP TYPEOUTS 
;:GO TO USER ERROR ROUTINE 


:sRUNNING IN APT MODE 
+ NO, SKIP APT ERROR REPORT 

:SET ITEM NUMBER AS ERROR NUMBER 
 EREPORT FATAL ERROR TO APT 


;;APT ERROR LOOP 
;SEE IF POWER FAIL ERROR CALL 
C T - HALT NOT ALLOWED 


LT : 
TEST FOR CHANGE IN SOFT-SWR 
: LOOP, ON ERROR SWITCH SET? 


eee 


SEQUENCE 


;DPM001 
;DPMOO01 





;DPMO001 
:DPM001 


141 


——— en eo eee ee 


CKFPADO FPTIF 
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ROUT INE 


PRT A 
037144 
901110 
001304 
037144 


001304 
036432 


001000 
001162 
177776 
000377 
000002 
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4$: 


ERM10: 


ae eee — — ~ — eee ee C+ 


TST 


IBSAVE 
SLPERR, (SP) 
SESCAPE 

5$ 

IBSAVE 

<< 
SESCAPE , (SP) 
A#SENDAD ,a#42 
6$ 


#B1T09,aSWR 
ERM10 

(SP), $REGO 
#-2, $REGO 
#377, a$REGO 
ERM10 
#2, (SP) 


:SEE IF THIS I 

sBRANCH BACK | 

: 3 CHEC 
F NONE 

“SEE LF THIS IS THE PWR MONITOR ERROR 

:BRANCH BACK IF SO - NO FUDGING 

> ;FUDGE RETURN ADDRESS FOR ESCAPE 


sACT~11 oe 
CH IF NO 


MONITOR ERROR 
UDGING 


;SEE IF ERROR #377 


SEQUENCE 


+ DPMO01 
;DPMO01 


;DPM001 
DPMO01 


142 
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SAVE AND RESTORE RO-R5 ROU” INES 


6275 .SBTTL SAVE AND RESTORE RO-RS ROUTINES 
$s 2 SREeeeaeeeeeeeaeaeeaeseeeceeeeeeeaeaeaeagaeageegaaeakaaneaaakaeeeetcaeeaeeaeeeeaeenaase 
:*SAVE RO-RS 
> *CALL: 
:* SAVREG | 
:*UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 
*@ 
3 *TOP---(+16) 
r% +2-—--(+18) 
zs +4—---R5 
. 7* 76---R4 
7% +B---R3 
3#+10---R2 
:%#+12---R1 
-#+14---R0 
037504 SSAVREG: 
037504 010046 MOV RO,-(SP) 7zPUSH RO ON STACK 
75 Bb oee MOV R1,-(SP) :;PUSH R1 ON STACK 
751 1D e7e MOV R2,-(SP) :;PUSH R2 ON STACK 
751 10346 MOV R3,-(SP) :;PUSH R3 ON STACK 
7514 10446 MOV R4,-(SP) :;PUSH R4 ON STACK 
Pale 10546 MOV RS,-(SP ::PUSH RS ON ST 
75 016646 000022 MOV 22(SP) ,-(SP) :: SAVE PS OF MAIN FLOW 
7526 16646 000022 MOV 22( o* sz SAVE PC OF MAIN FLOW 
75 16646 000022 MOV 22(SP) ,-(SP) z:SAVE PS OF CALL 
$2 16646 000022 22(SP),-(SP) szSAVE PC OF CALL 
7540 000002 RTI 
7 *RESTORE RO-R5 
>*CALL: 
. i RESREG 
7342 SRESREG: 
754 013666 000022 MOV (SP)+,22(SP) > RESTORE PC OF CALL 
Pee8 1¢9ee 000022 MOV (SP)+,22(SP) szRESTORE PS OF CALL 
755 012666 000022 MOV (SP)+,22(SP) s;RESTORE PC OF MAIN FLOW 
F328 012666 000022 MOV (SP)+,22(SP) s REST S OF IN FLOW 
756 12605 MOV (SP)+,R5 :zPOP STACK INTO R5 
7564 12604 MOV (SP)+,R4 :zPOP STACK INTO R4& 
75 12603 MOV (SP)+,R3 :zPOP STACK INTO R3 
0375 12602 MOV (SP)+,R2 :zPOP STACK INTO R2 
757 12601 MOV (SP)+,R1 :zPOP STACK INTO R1 
7574 4 600 MOV (SP)+,RC :;POP STACK INTO RO 
37576 000002 RTI 


SSN NS 
SSCAE 


SSSSS5 

SSaneee 

e=S=s9089 
MPR 


—M— 


=3 
oS 


~~™NNNNN 
~~ 
Fescrs 
we ew 


~™N 
Vv NN™N 
~ 


OOOOO OCOOCOCOCOCOCOCOOCOOOCOOCOCOOOOOOOCOCOOOCOOOOOOo 
SN 
o™ 


‘ 


oo 
par 
o 


aN 
we 


So 

— 
NS & 
WWNoOWwW 
NNwMVN- 


oe 

waones 

YSNSESO 
AUow 


— 
No 


_ Ses 
RA Wow 
SNNNOWS 
&* WVIin—© 
o NVINW— 


$s 


se 
SS 

w 
~w~w~w 
Nw 
on™N 


) 
— 
™m 
~ 
—~ 
oa 


J FRTTE ELTG PNT PRT A 


001157 


000002 
000001 


000100 


37650 
40632 


000040 


000002 
000011 
000200 


040140 


040012 
001156 


001154 
000001 


040012 
040140 


000040 
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- SB* fl TYPE ROUTINE 


“SRR eee Rea eeeeeeaaeaeaeeckakeaekekeaneaeneeeeceeeeaeenee 


[*RGUTINE TO TYPE ASCIZ MESSAGE. 


> * THE —— WILL INSERT A NUMBER 
Ei: SNULL 


MESSAGE MUST TERMINATE 
CHARACTERS AFTER A LINE 


WITH AO it 


SEQUENCE 


OF NULL FEED. 
CONTAINS — ya ye " BE USED #S THE FILLER CHARACTER. 


: *NOT 
> *NOTE2: SFILLS CONTAINS T R OF FILLER CHARACTERS REQUIRED. 
= *NOTE3 SFILLC CONTAINS THE CHARACTER TO FILL AFTER 
*@ 
**CALL: 
>*1) USING A TRAP INSTRUCTION 
pe TYPE ,MESADR :izMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
°Z 
_ TYPE 
:* MESADR 
*@ 
$TYFE: TSTB $IPFLG 3315 THERE A TERMINAL? 
BPL 1$ IF 
HALT i HALT HERE IF NO TERMINAL 
1$: MOV RO.-(SP) ::SAVE RO 
MOV a2(SP) RO ::GET ADDRESS OF ASCIZ STRING 
001336 CMPB #APTENV,SENV §::RUNNING IN APT MODE 
BNE 62$ ::NO,GO CHECK FOR APT CONSOLE 
001337 BITB §§ #APTSPOOL,$ENVM ; : SPOOL MESSAGE TO APT 
BEQ 62$ 60 CHECK FOR C 
MOV RO,61$ >: SETUP MESSAGE ADDRESS FOR APT 
JSR PC .SATY3 2 L ME TO 
61$: . WORD : MESSAGE ADDRESS 
001337 62$: BITB §§ #APTCSUP.SENVM :: CONSOLE SUPPRESSED 
BNE >: YES.SKIP TYPE OUT 
23: MOVB (RO) +,-(SP) :;PUSH CHARACTER TO BE TYPED ONTO STACK 
BNE 4$ IF IT ISN'T THE TERMINATOR 
TST (SP) + :31F TERMINATOR POP IT OFF THE STACK 
60$: MOV (SP) +, RO : :RESTORE RO 
3$: ADD #c, (SP) - ADJUST RETURN PC 
RTI ; ;SRETURN 
4$: ty #HT, (SP) : ;BRANCH IF <HT> 
CMB #CRLF , (SP) : BRANCH IF NOT <CRLF> 
TST (SP)+ ::POP <CR><LF> EQUIV 
has 7: TYPE A CR AND LF 
L 
CLRB  §$CHARCNT ::CLEAR CHARACTER COUNT 
BR % -:GET NEXT CHARACTER 
5$: JSR PC $TYPEC ::GO0 TYPE THIS CHARACTER 
6$: CMPB Ss SFIILLC, (SP)+ ::1S IT TIME FOR FILLER CHARS.? 
BNE 3: 1F NO GO GET . 
MOV SNULL .-(SP) >:GET # OF FILLER CHARS. NEEDED 
::AND THE NULL CHAR. 
7$: DECB~—s«aA‘C SP) ::D0ES A NULL NEED TO BE TYPED? 
BLT ng ::BR IF NO=-GO POP THE NULL OFF OF STACK 
JSR PC S$TYPEC >:G0 TYPE A NULL 
DECB $CHARCNT -:DO NOT COUNT AS A COUNT 
BR 7$ > LOOP 
“HORIZONTAL TAB PROCESSOR 
Rs: MOVB #° (SP) : REPLACE TAB WITH SPACE 


144 
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"wPE BOUT) 


23 277% 29573? 06001 9S: JSR PC STYPEC :TYPE A SPACE 
137776 7 900007 069:40 8178 #7 ,SCHARCNT BRANCH IF NOT AT 
340006 001 1 BNE > 9 23 sTaP 
wt 285 726 TST (SP)+ :POP SPACE OFF STACK 
06 — BR 23 oS GET NEXT CHARACTER 
Eis 

340012 105777 141126 TSTB asiKs ::CHAR IN KYBD BUFFER? 730001 
Re 1 109022 BPL 108% ce IF NOT ;™JD001 

0777646 167122 MOV a$TKB,-(SP) >:GET CHAR -™j0001 
640026 02716 177 BIC #177600,(SP) =: STRIP EXTRANEOUS BITS -MJD001 
Ne fi 716 00002 CMPR #SKOFF (SP) 7zWAS CHAR XOFF :™JD001 
04 101 BNE 102$ 7:BR IF NOT 3™JD001 
0 1018: -M50001 
Ava 105777 141102 TSTB asks ::WAIT FOR CHAR =MJD001 
04 1003 BPL 101$ 7MJD001 
040964 117716 141076 MOVB  a$ITKB,(SP) ::GET CHAR :4JD001 
040050 04716 177600 BIC #177600, (SP)  3;STRIP IT =MJD001 
040054 122716 000021 CMPR #$XON, (SP) 7:WAS IT XON? ;MJD001 
040060 001366 BNE 101$ :7BR IF NOT ;4JD001 
re s'e¢! 1028: 340001 
04 005726 TST (SP) + :rFIX STACK :MJD001 
040064 10$: :MJD007 
040066 105777 141060 TSTB. Ss STP ::WAIT UNTIL PRINTER IS READY 
040070 100375 BPL 10$ :MJD001 
040072 126627 000002 9000021 CMPB =-2( SP) , #SXON ::1S CHARACTER A RANDOM XON? = RANOO" 
re St ay leo BEQ STYPEX 7 BRANCH IF YES :RANOO1 
040102 116677 000002 141042 MOVB 2(SP),a$TPB : LOAD CHAR TO BE TYPED INTO DATA REG. 
040110 122766 000015 000002 CMPB so @# CR, 2 (SP) :1S CHARACTER A CARRIAGE PETURN? 
640116 00190 BNE 1$ ::BRANCH IF NO 
040120 105037 040140 CLRB SCHARCNT 2 TYES==CLEAR CHARACTER COUNT 
0401246 000406 RR $TY MIT 
040126 122766 000012 000002 ‘i$: CMPB ALF. Aico Is CHARACTER A LINE FEED? 
0401 00140 BEO $TYP :BRANCH IF YES 
040136 10522 INCB (Pe >: COUNT THE CHARACTER 
060140 000000 SCHARCNT:. WORD 0 =: CHARACTER COUNT STORAGE 
040142 000207 $TYPEK: RTS PC 


—~ —4 NSNAO Wms 
NIA Soo RVROOROOR 


ge 
EGERE 


POPOMOMOMONMPONONUNOonono > 


OOOCOCCOOCOCOCOCOCOCC OOOO OOOCCOOoOO 


RRRRRRRRERRRRRRERRRRRRRRRRERRERE 


"°6 6.7G CNT PRT A 


ASCII’ Ano Ty 


~~ — E> 
— A 
Onno 


SSNs 


-—Oo0o0-—-— 
Hs 
& & 
Ooo 


—~— = 
Sf 


o-~-—, 


~—9OO 
CSSSaeSe SSS 
Oo w 
Ww st oes 


NW NW 


ge 


I= 
* 
© 
a 


SS 


e 


000001 
000006 
000005 


040377 


040576 
177770 
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040375 


040375 
040377 
040374 


SEQUENCE 


-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


Perrier rrr irri it ii iit iiiiiiiiititiiiiii tt 

:eTH IS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGI' 
S*OCTAL (ASCII) NUMBER AND TYPE IT. 

> *$T/POS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


**CALL: 

ie MOV NUM, =< SP) 7 NUMBER TO BE TYPED 

7° TYPOS 7;zCALL FOR ant 

:* -BYTE WN :zN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
* -BYTE ™ 73M=1 ‘ 

:* =TYPE LEADING ZEROS 

*@ 

> *STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
: #$1YPOS OR $TYPOC 

*@ 
:* MOV NUM ,- (SP) 7 NUMBER TO BE TYPED 

:* TYPON 7zCALL ©OR TYPEOUT 


:s$1YPOC~—-ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
** : 


;* MOV NUM ,- (SP) > NUMBER TO BE TYPED 
3; TYPOC 7: CALL FOR TYPEOUT 
STYPUS: MOV a(SP),-(SP) + 3PICKUP THE MODE 
MOVB 1(SP) , SOF ILL eel LOAD ZERO FILL SWITCH 
MOVB (SP) +, SOMODE +1 ;NUMBER OF DIGITS TO TYPE 
ADD #2, (SP) : : ADJUST RETURN ADDRESS 
BR $TYPON 
STYPOC: MOVB #1, SOFILL ee Se] THE ZERO FILL SWITCH 
MOVB : E+1 szSET FOR SIX(6) DIGITS 
STYPON: MOVB #5, S0CNT ;SET THE ITERATION COUNT 
MOV R3,-(SP) «SAVE R R3 
MOV R4,-(SP) SZ SAVE RS 
MOV R5,-(SP) 7 SAVE RS 
a 7 E+1,R4 3:GET THE NUMBER OF DIGITS TO TYPE 
ADD #6,R4 Th ye IT FGR MAX. ALLOWED 
MOvVB R4, at USE 
MOVB SOF ILL RS 3:GET rhe “ZERO FILL AS 
MOV 12(SP), :sPICKUP T NPUT 
CLF R3 :CLEAR THE OUTPUT — 
1$: ROL R5 ::ROTATE MSB INTO "'C’’ 
BR 3$ 3:60 DO MSB 
23: ROL be) >: FORM THIS DIGIT 
ROL RS 
ROL 5 
MOV R5,R3 
3$: ROL 3 37GET LSB OF Hs | DIGIT 
DECB E tig H THIS DIGIT? 
BPL F NO 
BIC #177770.R3 :3GET ate OF JUNK 
BNE EST FOR 
TST R4 : : SUPPRESS THIS 0? 
BEQ 5$ F YES 
é$: INC R4 ::DON'T SUPPRESS ANYMORE 0°S 


"0 
0405146 


© 






REF 
Lo) 


RREEERE 
OOo 


Ooo0oo0oo 
ww 


RRRRRRERK 
OoOOooOOoOo0o 


o 
, 


3e9334 
960 


DO FETT EL TG ENT Pam A 
ELNAR® 7D OCTAL 


(ASCII AND TYPE 





000002 000004 


5$: 


7$: 


6$: 


8$: 
SOCNT: 


SOFILL: . 
SOMODE : 
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SE QUE NCE 
:sMAKE THIS DIGIT ASCII 
;7MAKE ASCII IF NOT ALREAD; 
:1S THIS A SPACE See ee og a 
SAVE IF + — TYPE ; DPMOO 


FOR TYP 
;;G60 AY hy ns DIGIT 
: <BR i: MORE TO DO 


‘ PINSURE LAST DIGIT ah A BLANK 
::G0 DO — DIGIT 


7 RES R3 
:3SET THE STACK FOR RETURNING 


TURN 
: STORAGE FOR ASCII DIGIT 
NATOR FOR TYPE ROUTINE 
_ 


Se 
e Be 
rmIO 
m m 
335 


ee IT CH 
NUMBER OF DIGITS TO TYPE 


147 


— ee ee 


[WARY 


ER 


FRRRERERRR 
RERRERRRRER 


® 


SRERVANVGERVOS 


tte we eee ee ey, 


FRERRERRRRRRKKK 
SAENSSRNOR POON 


~~ E> 
MO f Of 
S 


FRRRRRRRRRRRRRERRRRRRRRRRRERRRERERE 


ole le lelejlelojlelejlejl ej eje)ejelejo) ojo) 


ort FP "e © TG ENT BR” A 
, or > DEC IMAL 


OO — — 2 = «4 ~~ 
S38 
w 


sauwexe 


rT 
ree 
MRNA NOWRA SOMME MNP 


 _ 
NO 
Win 


38g 


NON WN & 


333% 


to ] -~—OoO0o--—_-- — 
mou So 
NSN 
SMNINOO Oo —-OO0o NOOO 


ssess 
sees 


SSSSSES5 


oS 


~DOO00 + + + 
RomononoNn 

SSS 

£8 


020200 
000020 


000055 


040614 
000040 


040604 


000001 
000060 
000040 


000010 


177777 


040614 
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WWD TYPE ROUTINE 


000001 


177777 


177776 


- SBTT. 


:*THIS ROUTINE IS USED TO CHANGE A .> BINARY NUMBER TO A 5-DIGIT 
; *S1GNED RIS POSITIVE OR ThE 


BET ORE 


-2 
$TYPDS: 


7$: 


9$: 


CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


{SSAA AAAAAA ATTA AHA T HHH KERAARARATARARKeERRe RHA AREeAheteeeeese 


MOV 
TYPDS 


NUM , = (SP) 


RO,-(SP) 
R5.-(SP) 
#20200, -(SP) 
20(SP) -R5 


R5 
#'=,1(SP) 
RC 


#SDBLK,R3 
#" (R3)+ 


Sb ray (RO), 91 


s 


(SP) 

(SP) 

6$ 

MS -1(R3) 


0,R2 


(SP) + 


NUMBER AND T 
OR NEGATIVE A SPACE OR A 
THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILi ALWAYS BEF 
: sREPLACED WITH SPACES. 
*® 


YPE IT. Rg ey, ON WHETHER 


;zPUT THE BINARY NUMBER ON THE STACK 
3::G0 TO THE ROUTINE 


;sPUSH RO ON STACK 
;sPUSH R1 ON STACK 


SIGET THE INPUT 


ssSETUP T 
AR THE BCD 
SIGET THE CONSTAN 
23 FORM THIS BCD DIGIT 
:BR IF DONE 
:: INCREASE THE BCD DIGIT BY 1 


Oe BACK THE CONSTANT 
sCHECK IF BCD DIGIT=0 
sé THROUGH IF 


IF 0 
za + an LEADING 0°S? 


HANGE TO ASCII 
: WAS iy Fa THE FIRST NON-ZERO? 
; SYES~=SET THE SIGN FOR TYPING 
INATOR 


Se Be Be 
Se Qe Ge © 
wn 
—4 
ib 
oOo 
x 
— 
2 
—_— 
So 
Pe) 
_— 


-p 
;;NOW TYPE THE NUMBER 


MINUS SIGN WILL BE TYPED 


SEQUENCE 


148 
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CONVERT BINARY TO DECIMAL “AN TYPE ROUTINE 


060002 000004 MOV ‘ 4 3z;ADJUST THE STACK 


MO 
RT! : RETURN TO USER 
SDTAL: 





0. 
SDBLK: .BLKW 4 


= _—— EE 


“RE RADS 


ac’ 


6283 


FOIE 6. TG ENT PR” A 
COMMUNICATIONS ROUTINE 


PERRY 
SESSSESS 
PRSSLERS 


SESSESESS 
S88 


So 
“SN 
Nm 


EER 


000 
041002 
1002 


SeSerresccces 
MS FOfLONMENMAL OS 


ee at a oe od =) ow = od 


RRRRRRRRRRRRRRKRRERKREK 


oO 
Ee 


SSeccoeRs. 
one SIU 


200001 
000001 


001332 
001334 
000004 
000004 
000002 
177776 
037600 
041070 
001336 
001316 


04 
041066 
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041070 
041066 


041070 


001336 
001337 


000004 


001316 


041000 
000004 


001320 
000004 


~SBTTL APT COMMUNICATIONS ROUTINE 


S SRR EHAAEAAHAAARAAHATEHAEKEKAEHEARAREAAARAAARREHR AHH AHERAhetaeenee 


1$: 


2$: 


12$: 


APTCSUP=040 


#1, SFFLG 
ere? 


SATY 

#1,$FFLG 
RO,-(SP) 
R1,~-(SP) 

SMFLG 

#APTENV, SENV 
#APTSPOOL . SENVM 


2 
SMSGAD ,RO 
RO 


RO, $MSGLGT 
#4, SMSGTYPE 


3:TO REPORT FATAL ERROR 
3:70 TYPE A MESSAGE 


::TO ONLY REPORT FATAL ERROR 


;3PUSH RO ON STACK 
;:PUSH R1 ON STACK 
oF eet: TYPE A MESSAGE? 


NO 
: OPERATING UNDER APT? 
; s SHOULD SPOOL MESSAGES? 


IF NOT: 
GET MESSAGE ADDR. 
RETURN ADDR. 
::SEE IF BONE w/ LAST XMISSION? 


::PUT ADDR IN MAILBOX 
:sFIND END OF MESSAGE 


32SUB START OF MESSAGE 

::GET MESSAGE LNGTH IN WORDS 
7zPUT LENGTH IN MAILBOX 
:;TELL APT TO TAKE MSG. 


::PUT MSG ADDR IN JSR LINKAGE 
RETURN ADDRESS 

2 PUSH 179776 ON STACK 

>=CALL TYPE MACRO 


; SHOULD REPORT FATAL ERROR? 
:c1F NOT: BR 
a a UNDER APT? 
iF INI SHED LAST MESSAGE? 
:IF NOT: WAIT 
GET ERROR 8 
RETURN ADDR. 


; BUMP 
TELL abt TO He © ERROR 
LEAR FATAL FLAG 


>: CLEAR LOG FLAG 

: CLEAR MESSAGE FLAG 
ai STACK INTO R1 

::POP STACK INTO RO 

$3 URN 

7 MESSG. FLAG 

3:LOG FLAG 

:ZFATAL FLAG 


mr a eee 


2P 

PRIPRIPIPIAIP PIN Y ts rs rk kk et et ot —O2 
™~ 

™ 


SENS 


— 
oe 


SESSNSRSENSNSHNVSENVAUSRORS 


Wwronononoenoenroenoeny 


NE RORNENREOR 


oe 


RRRRRRRRRRRRRRRRRRRRRRRRKRRRRRERRRRRRRRRRRRRRRE 
OroOoef 


ee me ee me me mr ee we ee ee ee aed nd od od od od ll el el ed ed 


IAI. AIANI WIN 


R 
ENS 


S3Ss _—O— 
NERS nue 
NE SOOfO 
Nao — _ 


R233 
aAnNNW 

— 

Cow 


Nm 


sesssrsescsscs<sscsssceg<s9 

pe er ee rey BA Geer ee ey SF 

FA SISAVINAVASNSNOSVSOSNRASOS 
ow Oviwonwr www — SWI hou NO Un 


S 


Pa” A 


000176 
1460036 
140032 
177600 
000007 
001134 
041511 
041516 
000176 
041527 


137754 
137750 


041504 
000006 


000015 
000004 
000002 


000006 
001313 
001135 


000100 


040012 
000060 
000067 


000060 
000002 


000002 
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001140 


090001 


137674 


000001 
137652 


- SBTTL 
- ENABL 


TTY INPUT ROUTINE 


SP eeeereeagaeaaeagaaeeeeereeeeeeaneaaeeerannetaaeneenateatenraneere 


LSB 


SEQUENCE 


s RARER RAAT AAAAAERTTRAARTAEAAHAHERA HERE HERR ER EE Ke REE ReeEEeeeres 
Z*SOFTWARE SWITCH REGISTER a. ROUTI 
> *ROUTINE 1S ENTERED FROM THE TRAP HANDLER, AND WILL 
: *SERVICE sen | TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 

nf OPERA MOD 


CK SUR 


SGTSwR: 


17$: 


TING IN TTY FLAG 
#SWRE ur 


a$TKS 

15$ 
a$TKB,-(SP) 
#°C177, (SP) 
#7 (SP)+ 

15 

SAUTOB, #1 
15$ 

SCNTLG 
-SMSWR 

SWREG, -(SP) 
, SMNEW 
-(SP) 

-(SP) 

a$TkS 

7$ 
a$TkB,-(SP) 
#°C177. (SP) 
(SP) #35 
10$ 
SSCNTLU 

#6, SP 

19 

(SP) #15 
16$ 

4(SP) 

11$ 
2(SP) ,aSWR 
#6,SP 
/$CRLF 
SINTAG, #1 
#100, aSTKS 


PC ,STYPEC 
(SP) ,#60 


E. 
215 THE SOFT-SWR SELECTED? 
IF NO 


CH 
:: CHAR THERE? 
:1F NO, DON'T WAIT ARCUND 
sSAVE THE CHAR 
::STRIP-OFF THE ASCII 
::1S IT A CONTROL G? 
2 3NO, RETURN TO USER 
WE RUNNING IN AUTO-MODE ? 
::BRANCH IF YES 
ah THE CONTROL-G (*G) 
7; TYPE CURRENT Sgt oh 
:: SAVE SWREG FOR TYPEGUT 
ae cal nae ASCIICALL DIGITS) 
NEW SWR 


3sMAKE IT 7-BIT ASCII 
:cIS IT A yall 
; sBRANCH IF 


YES, ECHO CONTROL =U (“U) 


: TBRANCH 


<LF> 
Y KBD INTERRUPTS? 
TTY KBD INTERRUPTS 


‘sk ? 

;;BRANCH IF YES 

3 ASCII 

3:18 THIS THE FIRST CHAR 
+ IF YES 


Po PRESENT 
es MO HAR 7" TO MAKE 


ROOM FOR NEW ONE. 
7ZKEEP COUNT OF CHAR 


1$1 
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TT¥ INPUT ROUTINE 


061 ; 056616 177776 BIS -2/SP), (SP) ::SET IN NEW CHAR 

et 0 BR 7$ :GET THE NEXT ONE 

941 1 st 901312 18$: TYPE SQUES TYPE 2<CR><LF> 

a) $3 000720 BR 20$ =:SIMULATE CONTROL-U 

-DSABL LSB 
. J ST AAAAAAAAAAAAAAAAAAAEEAEAAHHRAAAARARARAARAEAREARRAKRERARAEKR ERE ARE ES een 

:STHIS: ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
® 
:* RDCHR :: INPUT A SINGLE CHARACTER FROM ThE TTY 
;* RETURN HERE >: CHARACTER IS ON THE STACK 
7 ::WITH PARITY BIT STRIPPED OFF 

041354 011646 SRDCHR: MOV (SP) ,-(SP) :PUSH DOWN THE PC 

041356 07 000004 000002 MOV 4(SP),2(SP) :iSAVE T HE PS 

041 105777 137554 1$: TSTB =—s-_ aS TKS + WAIT 

0415 109375 BPL 1$ 7A CHARACTER 

041372 117766 137550 000004 MOVB a$TKB,4(SP) *:READ THE TTY 

0414 042766 177600 000004 BIC TEN 4(SP) 3;GET RID OF JUNK IF ANY 

041406 026627 000004 000023 CMP 4(SP) ,#2% 71S IT A CONTROL-S? 

041414 001013 BNE 3$ ::BRANCH IF NO 

041416 105777 137522 2$: TSTB =—s_ ASTKS =: WAIT FOR A CHARACTER 

041422 100375 BPL 2$ ;:LOOP UNTIL 17S THERE 

041426 117746 137516 MOVB a$TKB,-(SP) *GET CHARACTER 

041430 042716 177600 BIC #*C177, (SP) : MAK IT 7-BIT ASCII 

041434 022627 000021 CMP (SP) +, #21 71S IT A CONTROL-Q? 

041440 001 366 BNE 2$ -IF NOT DISCARD IT 

041442 000750 BR 1$ SIYES, E SUME 

041444 026627 000004 000021 3s: CMP 4(SP) ,#$XON “1S IT A RANDOM XON? :RANOOT 

041452 001744 BEQ 1$ = :BRANCH IF YES =RANOO1 

041454 026627 000004 000140 CMP =—s_—«s&& (SP) , #140 :31S 11 UPPER CASE? 

041462 002407 BLT 4 H IF Y 

04 1464 026627 000004 000175 CMP 4(SP) #175 3315 IT A SPECIAL CHAR? 

041472 003003 BGT 4g : BRANCH IF YES 

041474 042766 000040 000004 BIC #40.4(SP) ::MAKE IT UPPER CASE 

041502 0 Ove 4$: RT] -:G0 BACK TO USER 

041504 136 125 015 $CNTLU: .ASCIZ /*U/<15><12> = = CONTROL ‘U" 

041511 136 107 015 $CNTLG: .ASCIZ /*G/<15><12>  ::CONTROL ‘'G'’ 

041516 015 012 123 SMSWR: .ASCIZ <15><12>/SWR = / 

041527 040 040 116 $MNEW: .ASCI2 / NEW = 


—— eee 
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TRAP DECODER 


6287 - SBTTL TRAP DECODER 
etre iii tisi tsi rrr iii tii iitiiitiiiiiiiiy 
7 *THIS aout ie WILL ee THE LOWER BYTE OF He ""TRAP’’ INSTRUCTION 
:*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
:*OF THE mat waar _ THEN USING THE ADDRESS OBTAINED IT WILL 


-*G0 TO THAT 
941540 010046 STRAP: MOV RO,-(SP) ::SAVE RO 
041542 01 000002 MOV 2(SP) RO >:GET TRAP ADDRESS 
041346 0° 740 TST -(RO) > BA y 
04155 11000 MOVB (RO) ,RO 3 EGET RIGHT BYTE OF TRAP 
041552 006 ASL RO - :POSITION FOR INDEXING 
041554 01 041574 MOV STRPAD(RO) . RO 3: INDEX TO TABLE 
041560 808200 RTS :G0 TO ROUTINE 

-THIS IS USE 10” HANDLE THE GETPRI * MACRO 

041562 011646 $TRAP2: MOV (SP) ,-(SP) > :MOVE THE PC DOWN 
041564 010666 000004 000002 MOV 4(SP), “2USP) :sMOVE T HE PSW DOWN 
041572 000062 RTI : RESTORE THE PSW 

.SBTTL TRAP TABLE 

;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 

>*BY THE "TRAP’’ INSTRUCTICN. 

: ROUTINE 
041574 041562 S$TRPAD: .WORD $TRAP2 
041576 037600 $TYPE ;;CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
041600 040170 S$TYPOC ;;CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
041602 040144 STYPOS § ;;CALL=TYPOS :RAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
041604 040204 TY :CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
041606 040400 STYPDS ::CALL=TYPDS | TRAP+5(104405) TYPE DECIMAL NUMBER (WITH SIGN) 
041610 041142 SGTSWR ;::CALL=GTSWR §§ TRAP+6(104406) GET SOFT-SWR SETTING 
041612 041072 SCKSWR ::CALL=CKSWR | TRAP+7(104407) TEST FOR CHANGE IN SOFT-SwWR 
041614 041354 DCHR ::CALL=RDCHR TRAP+10(104410) TTY TYPEIN CHARACTER ROUTINE 
041616 037504 S$SAVREG ::CALL=SAVREG TRAP+11(104411) SAVE RO-R5 ROUTI 
041620 037542 SRESREG ::CALL=RESREG TRAP+12(1044 ESTORE RO-RS ROUTINE 

6288 21422 042622 -RSET ::CALL=RSETUP TRAP+13(104413) ROUTINE TO RESET STACK AND FPS 


6289 000030 STERM=.-$TRPAD 


mm ee ee ee ae ee ee Ce 
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POWER DOwN AND UP ROUTINES 


6291 -SBTTL POWER DOWN AND UP ROUTINES 


WR AAAREBSRASRAAASAALALASLAAAARAALALASARSASAARA RARER RARE RARER ERE RRR RRR RES ESS | 


-POWER DOWN ROUTINE 
SPWRDN: MOV 


04 1624 012737 042002 000024 #SILLUP a#PWRVEC ;;SET FOR FAST UP 
946 é 012737 000340 000026 MOV #340, aaPWRVEC+2 ::PRIO:7 

16s 019046 MOV RO,-(SP) >:PUSH RO ON STACK 
941642 010146 MOV R1,-(SP) *:PUSH R1 ON STACK 
04 1644 010 46 MOV R2,-(SP) :PUSH R2 ON STACK 

1646 07 MOV R3,-(SP) >:PUSH R3 ON STACK 
041650 010446 MOV R4,-(SP) > :PUSH R4 ON STACK 
041652 010546 MOV R5,-(SP) =:PUSH RS ON STACK 
041654 O17 137260 MOV aSwR,-(SP) ::PUSH @SWR ON STACK 

1660 1063 042006 MOV SP, $SAVR6 *:SAVE SP 
041664 012737 041676 000024 MOV #SPWRUP,a#PWRVEC ::SET UP VECTOR 
041672 HALT 
041674 000776 - BR .- : : HANG 

FF AAA EAE AAEA ERA EEAEEREAEAEAKEAAAEKRAERERAEAEKEKEEREREKEEEKKHEKERED 
“POWER UP ROUTINE 

041676 012737 042002 000024 $PWRUP: MOV #SILLUP,a#PWRVEC ;;SET FOR FAST DOWN 
041 04 0137 42006 MOV SSAVR6, SP ::GET SP 

1710 00503 42006 CLR SSAVR6 >*WAIT LOOP FOR THE TTY 
041714 5¢ 7 042006 1$: INC SSAVR6 *:WAIT FOR THE INC 
041720 001 75 BNE 1$ *:OF WORD 
041722 012677 137212 MOV (SP) +, aSwWR ::POP STACK INTO aSwWR 
0417 6 012605 MOV (SP)+,R5 ::POP STACK INTU R5 
041730 012604 MOV (SP)+,R4 =:POP STACK INTO R4 
041732 012603 MOV (SP)+,R3 ::POP STACK INTO R3 
041734 012602 MOV (SP)+,R2 ::POP STACK INTO R2 
041736 012601 MOV (SP)+,R1 ::POP STACK INTO R1 
04174 012600 MOV (SP)+,RO -:POP STACK INTO RO 
04174 127 041624 000024 MOV #SPWRDN, @#PWRVEC ::SET UP THE POWER DOWN VECTOR 
041750 012737 000340 000026 MOV #340, a#PWRVEC+2 ;:PRIO:7 
041756 104401 TYPE ::REPORT THE POWER FAILURE 
41760 04 672 SPWRMG: .WORD POWERM :;POWER FAIL MESSAGE POINTER 
041762 012716 MOV (PC) +, (SP) =:RESTART AT START 
041744 00 616 SPWRAD: .WORD START > :RESTART ADDRESS 
041766 042 66 000020 000002 BIC #20,2(SP) =: CLEAR ''T’ 
041774 005037 036504 CLR $TBIT =:CLEAR THE ‘'T'’ BIT FLAG 
04 000002 RTI 

000000 $ILLUP: HALT ::THE POWER UP SEQUENCE WAS STARTED 

4 000776 BR .-2 :: BEFORE THE POWER DOWN WAS COMPLETE 
04 000000 SSAVR6: 0 ::PUT THE SP HERE 
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ERROR TYPE OuT ROUTINE 
o¢°? -SBTTL ERROR TYPE OUT ROUTINE 
IPT tiie iti it titi itiitt ii litiitiiiiiiiiiiiiitiiiiiiiiriiiy 


PITTI IIIT TTI titi itititiiiiititititiiiii ti 


SS THIS ROUTINE IS CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 

>*IN THE ERROR MESSAGE DATA TABLE. IT IS CALLED BY THE SEPROR ROUTINE 

; #OR BY FIRST a tS SITEMB EQUAL TO THE ERROR TABLE ITEM TO BE PRINTED 

;*O0UT AND THEN ECECUTING A: 
;* JSR PC ,ERTYPE 






6 ;* 

“ 04 010 196401 001313 ERTYPE: TYPE “SCRLF : TYPE A CRLF 

7 014 113737 001102 001232 MOVB $TSTNM.$TMPO 

é 04 0 042737 177400 001232 BIC #177400, $TMPO 

é 13737 001116 001234 MOV SERRPC . $TMP1 :GET PC OF CALL 

é 5 042036 010046 MOV RO,-(SP) “SAVE RO 

6307 04 040 113700 001114 MOVB = SITE :GET THE ITEM NUMBER. 

6 4 042700 177400 BIC a7 7D. Ro “CLEAR UPPER BYTE EXPOSING OFFSET 
6 09 042050 001005 BNE 1$ “BRANCH IF OFFSET EXISTS 

6311 04 052 013746 001116 MOV SERRPC ,-(SP) :IF ZERO THEN JUST 

4 1 056 10440¢ TYPOC “PRINT THE PC 

6313 042060 000137 042406 JMP ERTS 

6315 04 064 022700 000377 1$: CMP #377.R0 

7 16 04 070 001005 BNE 20$ 

631 072 016600 000004 MOV 4(SP) RO 

6318 042076 011000 MOV (RO) ,RO 

6319 042100 062700 00040C ADD #400,R0 

6320 042104 010037 001320 20$: MOV RO, SFATAL :MOVE ITEM NUMBER TO $SFATAL FOR APT :DPMOO1 
6321 110 005 DEC RO “OTHERWISE MAKE RO AN 

63 é 112 006300 ASL RO : INDEX FOR THE TABLE. 

63 114 006300 ASL RO 

6324 042116 006300 ASL RO 

63 § 042120 062700 001442 ADD ASERRTB,RO 

63 $ 124 012037 042134 110$: MOV (RO) +,2$ :PICK UP THE ADDRESS OF THE EM, ERROR MESSAGE 
63 130 001404 BEQ 3$ “BRANCH IF NONE 

63 132 104401 TYPE 

6 Tt 0 2$: WORD 

6331 1 104401 TYPE 

6 : 140 001313 .WORD $CRLF 

6 142 012037 042152 3$: MO\ (RO) +,4$ :GET THE DH.DATA HEADER 

6335 042146 001404 BEG 5$ 

6 150 104401 TYPE 

6 152 000000 4$: WORD 0 

63 154 104401 TYPE 

6339 156 001313 .WORD $CRLF 

6341 160 010146 S$: MOV R1,-(SP) :SAVE R1,R2 AND R3 

5 : 162 10246 MOV ne. (SP) 

ot 164 010346 MOV -(SP) 

6345 042166 012001 V (RO) +,R1 ;GET THE ADDRESS 10F THE DATA TABLE 
6346 170 001501 BEOQ ERTS “RETURN IF NO DAT 

6348 042172 011000 MOV (RO) RO :GET A POINTER TO THE DATA FORMAT TABLE 


ee ee ee eee -st— - 


cREPADO FRITE FLIG. PNT 
TYPE Our TINE 





SNSo-= Sa 


-—OoD oO —- 


—- Woof 


&*—-O™nN 


owo-— 
—NUIO 


“—WwWWS = ~SO 
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PRO A 


000002 


049838 


000003 
000004 
042522 


000004 


000005 


042306 


000011 
042326 


000012 


42522 
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ERT1: 


8$: 


9$: 


90$: 


10$: 


118: 


12$: 
13$: 
14$: 


15$: 


16$: 


TSTB 
BNE 
MOV 
TYPOC 
BR 


CMPB 


12 


SEQUENCE 

(RO) Fi n«.*4T ZERO? 
8$ sh **:. “4 JF NOT 
a(R1)+,=-(SP) s;FORMAT ZERO SO TYPE 

“AN OCTAL NUMBER. 
ERT2 
#2, (RO) sFORMAT TWO? 
ot 
a(R1)+,R2 coon TWO SO TYPE TWO OCTAL NUMBERS 
PC, TOCTNM TYPE 2 NUMBER 
— TYPE 2ND NUMBER 
#3, (RO) sFORMAT THREE? 

$ sBRANCH IF NOT 

a(R1)+,R2 sFORMAT THREE SO TYPE FOUR OCTAL NUMBERS. 
#4,R :;TYPE 4 NUMBERS 
PC, TOCTNM TYPE AN OCTAL NUMBER 
R3,90$ > SUBTRACT 1 AND BRANCH IF NOT DONE 
ERT2 
#4, (RO) s;FORMAT FOUR? 
11$ s;BRANCH IF NOT 
a(Ri)+,-(SP) ;FORMAR FOUR SO TYPE 

3AN OCTAL NUMBER 
ie ; SUPPRESSING LEADING ZEROES. 
ERT2 
#5, (RO) sFORMAT FIVE? 
13$ 
(R1)+,12$ :FORMAT FIVE SO TYPE AN 
0 sASCIZ STRING. 
ERT3 
#171, (RO) ;FORMAT ELEVEN? 

“BRANCH IF NOT 
a(R1)+,14$ sFORMAT ELEVEN SO PICK 

“A POINTER TO AN ASCIZ 
0 : RING. 
ERT3 
Tig FRO? :FORMAT TWELVE? 

“BRANCH IF NOT 
+g R2 sFORMAT TWELVE SO TYPE 

; TYPE SIX OCTAL NUMBERS 
+e TOC TNM YPE AN OCTAL NUMBER 
R3.16$ * SUBTRACT 1 AND BRANCH IF NOT DONE YET 


ERT2 


156 
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ERROR TYPE Out ROUTINE 


rat 042356 600000 17$: WALT ZUNDEFINED FORMAT FOR DATA????? 
64 90$ 309 ERT2: TYPE om A TAB AFTER TYPING 

6409 06 042760 .WORD $TAB AN DATA TABLE ENTRY 

6410 | 7OF ALL FORMATS XCEPT 

6611 *ASCIZ. FORMATS 5 OR We 

poet | 04 905200 ERT3: INC RO :POINT TO THE NEXT FORMAT 

64146 06 005714 TST (R1) [END OF DATA TABLE. 

5615 04 0 11401 BEQ ERT 

6416 4 BR ERT? 

6418 04 37% 10464601 ERT4: TYPE = DONE. 

6419 76 001313 .WORD $CRLF 

6420 042600 012603 MOV (SP) +,R3 sRESTORE R1,R2 AND R3 

6421 01 602 MOV (SP) +-R2 

64 Q 4 12601 MOV (SP) +_-R1 

64 606 01 $00 ERTS: MOV (SP) +_RO :RESTORE RO. 

64 é 41 0 RTS PC “AND RETURN. 

64 

64 5 412 042422 042456 042506 PFECWS: .WORD  PFECEM,PFECDH, PFECAD, PFECFT ;ADRSES OF DATA/ASCII BELOw ;DPMOO' 
6428 0424 120 117 127 PFECEM: .ASCIZ ?P0WER MONITOR BIT FOUND SET? :ERROR MESSAGE = DPMOO1 
oe 456 124 105 123 PFECDH: -ASCIZ 2TESTNO ERR PC CPUERR? :ERROR DATA HEADER > DPMOO1 
6431 042506 001322 001116 037142 PFECAD: .WORD $TESTN,SERRPC.CPSAVE.0 : ADDRESSES OF DATA :DPMOO1 
64 ; 042516 000 000 000 PFECFT: .BYTE 0.0.0.0 -FORMAT TABLE = DPMOO1 
64 042522 012246 TOCTNM: MUV (R2)+,- (SP) sMOVE THE NUMBER TO THE STACK FOR PRINTING 
6435 042526 104402 TYPOC :TYPE AN OCTAL NUMBER 

6436 0425 6 104401 042762 TYPE SPACE : TYPE A SPACE CHARACTER 

6437 042532 000207 RTS PC sEXIT BACK 


_- —— — — 
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ef Pay FE* 
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6452 042562 


000137 
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001236 


001240 
001242 


036060 
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FPP SPURIOUS TRAP TO 2446 HANDLER 


seeetanaaneeeeeeaeeervecereeeaeraeranece seeeeteteeeeceneeaeeraaeeee 
+ ee eeeaeeeeareaeeeeereeeeeekeneeeneereareneeerereereeresceeeees 


SSTHIS ROUTINE 


HANDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR Al 264. 


:*THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS EFEN RECORDED 
>*THESE ALONG WITH THE FEC, FPS AND PC OF TRAP ARE REPORIED. 
® 


FPSPUR: MOV 
CMP 
STFPS 
MOV 
STST 
MOV 

1$: ERROR 
RSE TuP 


JMP 


(SP) ,STMP2 7SAVE PC OF TRAP. 
(SP)+,(SP)+ sRESTORE SP. 
RO :GET FPS 
RO, STMP3 
RO sGET FEC 
RO. STMP4 
#211 
:GO_ INITIALIZE THE FPS AND STACK; AND 
sSEE IF THE USER HAS EXPRESSED 
“THE DESIRE TO CHANGE THE SOFTWARE 
; VIRTUAL CONSOLE SWITCH 5 lal (HAS 
exer 7; THE USER TYPED CONTROL G?) 


SE QUE NCE 


Ss 


— eee ee 
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“PL SPURIOUS "RAP TO 4 HANDLER 


6453 .SBTTL CPU SPURIOUS TRAP TO 4 HANDLER 
6454 .s SSSA eeeeeeeeeseeeeeeeeeeeeeee eee aeaaeeeeeeececeeaeaeeeeaeaeeeerve 
J SSSA AAHAAAAATAHAHAAAAAKAHAAARAKEAARRAeKeHHReAReeeetenaeeeeene 
455  *THIS ROUTINE REPORTS UNEXPECTED CPu TRAPS TO VECTOR 4. 
s2$ 42596 011637 001236 EPSPUR: MOV (SP), $TMP2 ;SAVE PC OF TRAP. 
6458 342572 0226¢ CMP (SP)+, (SP)+ 
64 049574 1 ig 1$: ERROR +212 
64660 062576 19541 RSE TUP ;G0_ INITIALIZE THE FPS AND STACK; AND 


: THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
: THE USER TYPED CONTROL G?). 

646° 042600 000737 036060 JMP SEOP 


—_—— Li TT TT TTT Tm ——<——_ = 


666 
646 


54456 

$B aco 
bee? 4c 619 
e468 04961 
6469 0462616 


6470 062676 
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“PL SPURIOUS "RAP TO 10 HATIDLER 


-SBTTL CPU SPURIOUS TRAP TO 10 HANDLER 


pF eeeaereeaeaeraerearaeeereereeereeaeeaereraecaenegaagakeegteretaerareeeres 
+ ee eekeeeeeeeeeeneeeeeeeeeeaneneeneeeenenteareeeeerereereereres 


:STHIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10. 


013637 001236 cp Two: MOV (SP) ,STMP2 SAVE PC OF TRAP. 
262 CMP (SP)+,(SP)+ 

10421 1$: ERROR +213 

10541 RSE TUP 


:GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE U PR D 


HE SOF TWARE 
:VIRTUAL CONSOLE SWITCh ake (HAS 
;THE USER TYPED CONTROL G?) 
000737 036060 JMP SEOP 


160 
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FAS ESE” QND CONSOLE TES” ROUTINE 


6477 .SBTTL FLAG RESET AND CONSOLE TEST ROUTINE 
6472 s eeeeerenaetaeearaareeeeeeereaneeanaeeeecerararangeertanatenaraeaeresr 
+ Seeekeeeeeeareneeeeteedeneenerenerenteeeeeeeeeneenereereeeeeeese 
6472 <STHIS ROUTINE WILL BE CALLED AT THE END OF EACH TEST TO 
647% >*RESET THE STACK, CLEAR THE FPS AND SEE IF THE USER HAS TYPED 
6475 :* CONTROL G ON INAL. IF THE USER HAS TYPED CONTROL G AND 
647 >*THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 
647 7*OF THE SOF TWARE Sul TCH REGISTER WILL BE TYPED IN OCTAL ON THE 
478 :*TELETYPE AND THE USER CAN MODIFY IT. 
6480 042622 023727 001140 177570 “RSET: CMP SWR.#177570 :SEE IF THERE IS A PHYSICAL 
6481 ; CONSOLE Switch REGISTER. 
64 042630 001001 BNE 1$ CH 
6483 042632 104407 CKSWR < OTHERWISE TYPE THE CONTENTS 
64 [OF THE PROGRAM VIRTUAL SWITCH REGISTER 
64 5 AND GIVE T THE USER A CHANCE TO 
6487 042634 012737 042534 000244 1S: MOV #FPSPUR,FPVECT 
6488 04 re 012737 042566 000004 MOV #CPSPUR,ERRVECT 
6489 042650 012737 042604 000010 MOV #CPTWO,10 
6490 042656 011600 MOV (SP) RO :SAVE RETURN ADDRESS. 
6491 042660 012706 001100 MOV #STACK,SP “RESET THE STACK POINTER. 
6492 042664 00 004 CLR R4 “CLEAR THE FPS. 
6493 042666 170104 LDFPS RG 
6494 042670 000110 JMP (RO) : RETURN. 
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SPECIAL MESSAGES 


-SBTTL SPECIAL MESSAGES 


64 $ ¢ $08 120 (17 POWERM: .ASCIZ <CRLF>*POWER FAILURE. PROGRAM RESTARTING. *<CRLF> 
6497 04273 NULL -BYTE 0 

6698 062760 = G11 000 $TAB:  :ASCIZ <TAB> 

64 fog 94004000 SPACE: = -ASCIZ 

6500 04275 20€ 120 103 LFIEA1: .ASCIZ <CRLF>‘*PC OF LAST FPP INSTRUCTION EXECUTED: '<TAR> 
6501 043015 00 114 101 LFIEM2: .ASCIZ <CRLF>*LAST FPP INSTRUCTION EXECUTED: ‘<TAB> 
6502 045057 00 196 114 FPSMS: .ASCIZ <CRLF>*FLOATING POINT STATUS REGISTER: . 

6503 045128 00 106 #105 FECMS: ‘ASCIZ <CRLF>"FEC: 

6504 0431 126 110 105 S$THE: eASCIZ ‘THE ° 

6505 045141 011 040 111 NOOP1: .ASCIZ <TAB>* INSTRUCTION FAILED. ‘<CRLF> 

0298 043170 105 117 1s NOOP15: .ASCII ‘EITHER A BAD CONSTANT WAS GENERATED OR MICROPROGRAM FLOW WENT’ 
6507 043265 200 106 122 NOOP2: .ASCIZ <CRLF>*FROM STATE ° 

6508 043302 1246 117 040 NOOPS: .ASCIZ ‘TO STATE ° 

6509 043314 200 117 116 NOOP4: .ASCIZ <CRLF>*INSTEAD OF ° 

6510 065331 200124110 NOOPS: -ASCIZ <CRLF2" THEREBY EXECUTING A * 

6511 043357, +9«011,-=S/s«040~=S—s—«‘d1‘'7's«s«WNOQOPS:  TASCIZ © <TAB>’ INSTEAD OF A ° 

6512 063377 011 «040111 NOOB? “ASCIZ <TAB>* INSTRUCTION. *<CRLF> 

651 ot BH 04C 040 124 NOOP10: .ASCII ‘ TEST.*<TAB>'PC OF CALL.'<TAB>'PC OF ERROR. '<TAB> 
6514 043460 107 4+117 126 “ASCIZ ‘GOT FPS. EXPECTED FPS. ‘<CRLF> 

6515 043510 101 040 102 11: [ASCIZ 'A BAD CONSTANT MAY HAVE BEEN USED. '<CRLF> 

6516 043554 011 114 106 LFPS1 -ASCIZ <TAB>'LDFPS'<TAB>'REG' 

6517 043567 011 114 104 LD1: eASCIZ <TAB>'LDD'<TAB>* (REG) ,A‘'<TAB>'//FSRCA#0//' 

6518 043617 ~~ O1 116 104 -LD2:  TASCIZ <TAB>'LDD*<TAB>'A, A’ 

6519 043630 017 123 124 STFS1: .ASCIZ <TAB>'STFPS'<TAB>'REG' 

6520 043643 O11 123 124 «ST1: «= LASCIZ <TAB>'STD'<TAB>'A, (REG) * 

6521 043660 011 123. 126 $12: <ASCIZ <TAB>'STD'<TAB>'A.A' 

6522 043671 = 1 103 106 CFCC1: <ASCIZ <TAB>'CFCC' 

6523 043677. S(O 123 105 SETF1: [ASCIZ <TAB>'SETF® 

6524 043705 = 011 123 105 SETD1: [ASCIZ <TAB>'SETD' 

6525 043713 = 011 123 105 SETI1: <:ASCIZ <TAB>'SETI' 

6526 043721 ~—s- O11 123 105 SETL1: [ASCIZ <TAB>'SETL' 

6527 043727 O11 111 114 ILL1:  lASCIZ2 <TAB>*ILLEGAL FPP INSTRUCTION' 

6528 043760 = 011 123 124 ~STST1: ‘<ASCIZ <TAB>'STST'<TAB>'REG' 

6529 043772 O11 111 116 ItL2: ‘%ASCIZ <TAB>*ILLEGAL FPP INSTRUCTION (FID=1)° 

65 044033 040 040 124 ILLMS: .ASCIZ ‘°* TEST.*<TAB>‘PC OF CALL.'<TAB>'PC OF TRAP. '<TAB>'FPS.*<CRLF> 
6531 044101 105 130 120 MSI: <ASCIZ “EXPECTED ° 

6532 O64115 = 107112124 MSZ: CASCIZ “GOT 

6933 044120 103117116 M3: CASCIZ SCONTENTS QF LOCATIONS * 

6534 044147 0460 126 110 MS: [ASCIZ ‘ THROUGH ' 

6535 044161 106 ~=—-107 111 MSS:  [ASCIZ ‘FAILURE IN THE MICROPROGRAM FLOW. ° 

6536 044223 = 105117116 MSG: <ASCIZ CONTROL WENT * 

6537 044241 106 122 +117 MS7:  <ASCIZ ‘FROM STATE ' 

6538 044255 040124 117 MS10: :ASCIZ + TO STATE * 

6539 044270 102 125 124 MS11:  :ASCIZ ‘BUT SHOULD HAVE GONE' 

6540 044315 103 117 116 MS12:  <ASCIZ ‘CONTROL FLOW SHOULD HAVE GONE* 

6541 044353 102 #125 126 MS13:  [ASCIZ ‘BUT DID NOT.” 

6542 064370 040040124 S14: «ASCII. TEST.*<TAB>'PC OF CALL. *<TAB>*PC OF ERROR. *<TAB> 
6543 044431 107 «117 ts«*dN'‘DA "ASCIZ ‘GOT PC.*<TAB>"EXPECTED PC. ° 

6546 044456 111 116 123 S15:  [ASCIZ ‘INSTRUCTION TESTED: ‘ 

6545 04450 060 117 122 MS16: <ASCIZ ' OR' 

6546 044510 124105123 MST7: CASCIZ STESTING ACCUMULATOR ' 

6547 04453 132 105 122 MNUMO: ‘ASCIZ ‘ZERO ' 

6548 044543 117 116 105 MNUMI: -[ASCIZ ‘ONE ' 

6549 044550 126 127 117 MNUM2: ‘ASCIZ ‘Two ' 

6550 044555 124 110 122 MNUM3: “ASCIZ ‘THREE ° 

6551 046564 106 717 125 MNUMG: “ASCIZ ‘FOUR ' 


EE ee 
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o23¢ BS gesere 106 7117 126 5: .ASCIZ 

040 Us 126 S20: -ASCIZ 
6554 ners, 1046 1017 fs MS21: -ASCIZ 
6555 Be 5 114 117 107 mS ¢: -ASCIZ 
65 47 114 117 107 S23: ASCIZ 
6557 0447 046 040 1246 MS24: , {rn 
$228 eget 116 1$3 115 ASCIZ 
6559 045052 183 130 120 S25: -ASCIZ 
6560 045074 107 117 124 S26: -ASCIZ 
6£61 0465111 $00 101 103 MS27: -ASCIZ 
6562 0451 9 00 101 103 M™S30: -ASCIZ 
656 ott 00 101 103 MS31: ASCIZ 
6564 0451 00 101 103 MS32: -ASCIZ 
6565 04514 00 101 103 S33: -ASCIZ 
$366 045154 99 101 103 MS34: -ASCIZ 
6567 045163 12 105 124 S35: -ASCIZ 
O208 0451 9 103 114 105 MS36: ASCIZ 
$36 04517 116 117 101 S37: -ASCIZ 
65 Nagi? 122 105 101 M™S40: -ASCIZ 
6571 045231 105 130 1720 S415: .ASCIZ 
6276 045251 104 101 124 MS41: -ASCIZ 
65735 045275 104 101 124 MS42: ASCIZ 
6574 045313 107 117 124 S43: ASCIZ 
6575 045330 105 130 120 S44: eASCIZ 


H 13 
08:47 PAGE 71-1 


SEQUENCE 


VE 
: TEST. *<TAB>'PC OF CALL. a OF ERROR." 
NUMBER 


"LOGICAL AND OF FAILING ° 
"LOGICAL OR OF FAILING ° 
tan BEST.*<TAB>*PC OF CALL, *<TAB>'PC OF ERRORS. ‘<TAB> 
"NUMBER OF ——eo: 


<CRLF>*AC 
<CRLF>'AC 
<CRLF>*AC 
<CRLF>'AC 
*S i. 


"Cc 0 

‘LOADED DATA: ° 

"READ DA oe ae 

"EXPECTED D . 
"DATA IN (RO) “FSRC: : 
"DATA IN ACO: 


T RESU tT: 
"EXPECTED RESULT: : 


> 
Ws © 
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ERROR MESSAGES 


6378 -SBTTL ERROR MESSAGES 
6577 04535 


114 104 106 EMI: -ASCIZ ‘LDFPS AND STFPS TEST FAILED.’ 
0278 04540 1146 104 136 one -ASCIZ FPS AND STFPS TEST ERROR S RY.' 
65 Oe ee3 103 106 103 EMS: eASCIZ ‘CFCS TRANSFERED BAD DATA TO THE PSw.' 
65 ze 198 106 102 EM4: eASCIZ ‘CFCC MODIFIED THE FPS ot the ’ 
6581 045500 125 116 105 EMS: -ASCIZ ‘UNEXPECTED FPP T shen TO . 
65 4 5614 125 116 105 EM6: eASCIZ ‘UNEXPECTED CPU T TO 4.° 
6585 045646 125 116 105 EM: eASCIZ ‘UNEXPECTED CPU TRAP TO 10.° 
65 aS EMTO=EM5 
6585 045701 1 116 101 EM11: -ASCIZ ‘UNABLE TO DECODE FPP INSTRUCTION. TRAPPED TO 10." 
re 000000 EM12=0 
65 900000 EM1 3=0 
6588 045762 114 104 106 EM14: -ASCII ‘LDFPS RO FAILED IN THE FSRC FLOWS. ' 
589 046024 040 124 122 -ASCII] °* TRAPPED TO 4. 
ore ra 200 104 111 -ASCIZ. <CRLF>*DID NOT GO FROM STATE 400 TO 670. : 
6591 04610 123 124 106 EM15: ASCII ‘ STFPS R1 FAILED IN THE FDST FLOWS. 
6592 046147 040 124 122 ASCII TRAPPED TO 4. 
6595 046165 200 104 117 -ASCIZ <CRLF>"DID NOT GO FROM STATE 634 TO 710.' 
6594 046 101 116 040 EMI6: -ASCIZ ‘AN ILLEGAL FPP toe Bl po DID NOT TRAP.' 
6595 046301 101 116 040 EM17: [ASCII ‘AN ILLEGAL FPP_INSTRUCTION’ 
o2n8 6 200 1246 122 -ASCII <CRLF>*TRAPPED TO 244, BUT FAILED TO SET ° 
659 peerrs 124 110 105 -ASCII ‘THE FPS CORRECTLY. '<CRLF>' EITHER A BAD CONSTANT 
6598 04644 127 101 123 -ASCIZ } GENERATED OR THE ALU LOGICAL OR FUNCTION NAILED. ‘ 
6599 046534 101 116 040 EM20: ~ASCII ‘AN ILLEGAL FPP INSTRUCTION’ 
6600 0465 060 126 122 “ASCII * TRAPPED TO 244, BUT A SUBSEQUENT ' 
6601 0466 060 123 126 "ASCII * STST'<CRLF> 
6006 $0636 106 101 117 -ASCIZ ‘FAILED TO PICK UP THE CORRECT FEC CODE = 2.' 
66035 046712 123 124 123° EM21 ASCII ‘STST R4 FAILED IN THE DESTINATION FLOWS. ' 
6604 046762 040 1246 122 "ASCII * TRAPPED TO 4. '<CRLF> 
6605 047001 104 111 104 -ASCIZ ‘DID NOT GO FROM STATE 6. TO 710.' 
G08 047043 101 116 040 EM22: ~ASCII ‘AN ILLEGAL FPP INSTRU 
4607 047076 127 117 124 eASCIZ ‘WITH INTERRUPTS DISABLED. i 
6608 047043 EM23=EM22 
6609 047043 EM24=EM22 
6610 047130 123 117 125 EM25: -ASCII ‘SOURCE LOCATIONS MODIFIED BY, LDD.' 
6611 ANE: 200 101 040 -ASCIZ i DATO WAS PERFORMED INSTEAD OF A DATI.' 
yo Bf 724 114 104 104 EM26: ASCII D (RO),ACO FAILED. *<CRLF> 
6613 067270 122 060040 “ASCIZ "RO WAS MODIFIED.” 
6614 04724 EM27=EM26 
6615 047311 124 110 105 EM350: -ASCII ‘THE PC WAS BAD AFTER 7 
6616 067337 101116040 “ASCIZ ‘AN FPP INSTRUCTION. ' 
6617 047363 = 123 124 = 104 EM31: ASCII. "STD ACO, (RO) FAILED. *<CRLF> 
6618 047410 122 = 060040 "ASCIZ "RO WAS MODIFIED. * 
6619 04736 EM32=EM3i 
6620 047431 123 «= 124 = 104 -EMS3: ASCII. ‘STD _ACO,(RO) FAILED. *<CRLF> 
1067456 117 125 126 “ASCIZ ‘OUTPUT BAD.' 
$ ote dhs 123 124 104 EM34: -ASCII ‘STD ACO, (RO) FAILED es + FDST FLOWS. : 
04754 200 = 124~=Ss«*110 “ASCIZ <CRLF>* THE (BUT GR7) FORK FAILED. ° 
4067574 = 114104104 EMSS: ASCII *LDD_ (RO) ,ACO FAILED IN. THE FSRC’ELOWS. * 
5 047642 200124110 “ASCIZ <EALr > Hé (BUT GR7) FORK FAILED.’ 
6 047676 = 125124 104 EMS6: “ASCII. "STD ACO.(RO) FAILED. IN THE FDST FLOWS. 
047744 = 200124110 “ASCIZ <CRLFO "THE (BUT FD). FORK 
r7z WN 106104 EMB7: ASCII "LOD. (RO) ACO FAILED. IN THe FSRC FLOWS." 
050065 200124110 “ASCIZ  <CRLF>" THE (BUT FD) FORK FAILED, 
6680 050100 114 +104. ~=S«104-«EM40: + “ASCIT. = “LDD (ROD_ACO-OR THE STD ACO. (RO) FAILED." 
6631 050150 200 102 101 -ASCIZ <ERLF> BAB. DATA WAS DETECTED AFTER A SEQUENCE - THE TWO INSTRUCTIONS." 
6632 050251 106 120 123 EM41:  ‘ASCIZ ‘FPS BAD AFTER EXECUTION OF: 
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son —- ONS 
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ASCII 
EM43: 
ASCII 
SCIZ 
EMG: -ASCIZ 
EMSS 
EM46: -ASCIZ 
EM47: 
ASCII 
ASCIZ 
EMSO: ASCII 
ASCIZ 
EMS1: “ASC1Z 
EMS2: 
ASCII 
ASCI1Z 
EM53 
ASCII 
ASCII 
ASCII 
ASC1Z 
EM54 
ASCIZ 
EMS5 
ASCII 
ASCIZ 
EM56 
ASCII 
ASCII 
SCII 
eASCIZ 
EMS7 
-ASCIZ 
EM60: 
ASCII 
ASCII 
ASCII 
-ASCIZ 
EM61: 
-ASCIZ 
EM62: ASCII 
ASCII 
ASCII 
-ASCIZ 
EM63: ASCII 
ASCII 
ASCII 
-ASCIZ 
EM64: ASCII 
eASCIZ 
EM65=EM64 
EM66: 
-ASCIZ 
EM67: 
ASCII 
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SEQUENCE 


/LDD (RO),ACO FAILED IN THE FSRC FLOWS. tc 
/THE (BUT FSRC) FORK FAILED. TRAPPED TO 4 


/STD ACO, - FAILED Mr THE FDST A ee F /<TRLF> 
/THE (BUT FDST) FORK FAILED. TRAPPED TO 4./ 
"FPP ACCUMULATORS DATA TEST FAILED.* 

"FPP ACCUMULATORS DUAL ADDRESSING TEST FAILED.' 
/LD AC1,ACO certee “ THE FSRC FLOWS./ 

/THE (BUT FSRC) FORK FAILED. oe oe TC 4./ 

"LD ACI, at FAILED ry THE FSRC FLOWS. 

‘THE (BUT FD) FORK FAILED. 

"LD AC1,ACO TRANSFERRED BAD DATA.' 


/LDD (RO)+,ACO FAILED IN THE FSRC FLOWS./ 
/THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 


/LDD (RO)+,ACO AD." <CRLF> THE FSRC FLOWS./ 


<CRLF>'RO WAS BAD 
ONSTANT WAS GENERATED OR'<CRLF> 
\DID NOT GO FROM STATE 627 TO 322.\ 


/LDD (RO)+,ACO TRANSFERRED BAD DATA./ 


/LDD -(RO),ACO FAILED IN THE FSRC FLOWS./ 
/THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 


/LDD -(RO),ACO FAILED te THE FSRC FLOWS./ 
RO WAS BAD.*<CRL 


TANT WAS GENERATED OR*<CRiF> 
\DID NOT GO FROM STATE 627 TO 324.\ 


/LDD -(RO),ACO TRANSFERRED BAD DATA./ 
/LDF (RO)+,ACO FAILED a> THE FSRC FLOWS./ 
WAS BAD.' pe at 


<CRLF>'RO 
"EITHER A BAD CONSTANT WAS GENERATED OR‘'<CRLF> 


\DID NOT GO FROM STATE 627 TO 322.\ 
/LDF (RO)+, -ACO TRANSFERRED BAD DATA. / 
SCRLF > THE (BUT FD) FORK 

"WENT FROM STATE 441 TO 077, °<CRLF> 
LINSTEAD | OF FROM 441 TO 096." 

"LDD #NUM,ACO Q FAILED INT IN THE FSRC FLOWS.° 
<CRLF>" THE 


FAILED. °<CRLF> 
"WENT FROM STATE 507 10 O'174,'< <CRLF > 


"INSTEAD OF FROM 207 T 


"LDD #NUM,ACO FAILED IN THE FSRC FLOWS." 
<CRLF>'A BAD CONSTANT WAS USED WHEN THE PC WAS INCREMENTED. * 


/LDD #NUM,ACO TRANSFERRED BAD DATA./ 
*"LDD a@(RO)+,ACO FAILED IN THE FSRC FLOWS." 


rs ne a wer 
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AS 

-AS 

AS 
EM70: 

.AS 

-AS 
EM71: 

.AS 

.AS 
EM72: 

.AS 

.AS 
EM73: 

-ASCIZ 
EM74: 

ASCII 

.AS 

-AS 

.AS 
EM75: 

.AS 

AS 
EM76: 

AS 

AS 
EM77: 

.AS 

-ASC 
EM100: 

-ASCIZ 
EM101: 

-ASCIZ 
EM102: 

ASCII 

ASC 
EM103: 

ASCII 

SC 

EM104: 

-ASCIZ 
EM105: 
EM106: 

ASCII 
EM107: 
EM110: 

-ASCIZ 
EM111: 


SEQUENCE 


<CRLF>"THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.' 
<CRLF>\WENT FROM STATE 627 TO EITHER 326 OR 326,\ 
<CRLF>\INSTEAD OF FROM 627 TO 323.\ 


"LDD a(RO)+,ACO FAILED IN THE FSRC FLOWS." 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 


"LDD a(RO)+,ACO FAILED IN THE FSRC FLOWS. * 
‘THE (BUT FD) FORK FAILED." 


"LDD a(RO)+,ACO'<CRLF> 
"FAILED TO INCREMENT RO BY 2.' 


*LDD a(RO)+,ACO LOADED BAD DATA.' 

*LDD a- (RO) -ACO sar IN THE FSRC FLOWS.' 
<CRLF>'THE (BUT FSRC) FORK FAILED. TRAPPED TO 4. 
<CRLF>\WENT FROM STATE 627 TO EITHER 326 OR 326, \ 
<CRLF>\INSTEAD OF FROM 627 TO 325.\ 


"LDD @-(RO),ACO FAILED IN THE FSRC FLOWS.’ 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.' 


"LDD a@-(RO),ACO FAILED IN THE FSRC FLOWS." 
‘THE (BUT FD) FORK FAILED." 


"LDD a-(RO) ,ACO'<CRLF> 
"FAILED TO DECREMENT RO BY 2." 


"LDD a@-(RO),ACO LOADED BAD DATA.' 


"LDD NUM (RO) ACO FAILED IN THE FSRC FLOWS.' 
<CRLF>"THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.' 


"LDD NUM(RO) ,ACO'<CRLF> 
"FAILED TO AFFECT RO BY 2." 


*LDD NUM(RO) ACO FAILED IN THE FSRC FLOWS.' 
"THE (BUT FD) FORK FAILED.' 


"LDD NUM(RO).ACO LOADED BAD DATA." 


"LDD @NUM(RO),ACO FAILED IN THE FSRC FLOWS.' 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 


*LDD QNUM(RO) ,ACO'<CRLF> 
"FAILED TO AFFECT RO BY 2.' 


"LDD QNUM(RO),ACO FAILED IN THE FSRC FLOWS." 
"THE (BUT FD) FORK FAILED.' 


*LDD @NUM(RO),ACO LOADED BAD DATA." 


/LDD AC7,ACO FAILED TO TRAP TO 244./ 
<CRLF>/AC7 IS AN ILLEGAL ACCUMULATOR. / 
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ERROR MESSAGES 


033396 1146 104 104 ASCII 
55576 g00 101 103 1 
o7 36 055 —EM114=EM11 
67 82 269¢ —M115=EM111 
67 0555 EM116=EM113 
6739 033636 —M117 
0336 125 123 105 ASCII 
055 $9 200 124 122 ASCIZ 
6740 0557 § —M120 
05577 125 123 105 -ASCII 
056054 200 124 122 ASCIZ 
6741 620158 123 124 040 €EM121 ASCII 
6742 0561 200 124 110 -ASCIZ 
6745 056245 123 124 040 EM122 -ASCII 
6744 056311 200 124 110 -ASCIZ 
6745 056344 123 124 040 £€M123: .ASCIZ 
6746 056405 EM124 
056405 106 120 123 ASCII 
056440 200 124 110 -ASCIZ 
6747 056500 EM125 
056500 106 120 123 ASCII 
056533 200 124 110 -ASCIZ 
6748 056570 114 104 104 €EM126: .ASCII 
6749 056624 040 106 123 ASCII 
6750 Beees2 124 110 105 ASCII 
6751 056706 200 127 105 -ASCII 
0726 056742 200 111 116 -ASCIZ 
6753 056777 114 104 104 €M127: .ASCII 
6754 037068 040 106 123 ASCII 
6755 05706 200 124 110 ASCII 
6756 057121 127 105 116 -ASCII 
6757 057154 200 1117 116 eASCIZ 
6758 057212 114 104 104 €M130: .ASCII 
6759 057246 106 123 122 ASCII 
6760 O37 67) 102 125 124 -ASCIZ 
6761 057312 EM131: 
057312 114 104 103 ASCIZ 
6762 057352 EM132: 
337335 114 104 103 ASCIZ 
6803 05741 EM133: 
057412 101 104 104 -ASCIZ 
6804 057451 EM134: 
057451 101 104 104 eASCIZ 
6805 057510 EM135: 
057510 123 125 102 ASCIZ 
6806 057547 EM136: 
057547 123 125 102 -ASCIZ 
6807 057412 EM137=EM133 
6808 057451 EM140=EM134 
rere 057510 EM141=EM135 
10 057547 Flea 
6811 057606 M143: 
057606 101 104 104 -ASCIZ 
6812 057641 EM144: 
057641 123 125 102 -ASCIZ 
6813 057606 EM145=EM143 
6814 057641 EM146=EM144 


= 
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SEQUENCE 


/LDD AC6,ACO FAILED TO TRAP TO 244./ 
<CRLF>/AC6 IS AN ILLEGAL ACCUMULATOR. / 


"USE OF AN ILLEGAL ACCUMULATOR WITH FSRC MODE ZERO," 
<CRLF>* TRAPPED BUT FAILED TO SET FPS CORRECTLY." 


"USE OF AN ILLEGAL ACCUMULATOR WITH FSRC MODE ZERO. 
<CRLF>* TRAPPED BUT FAILED TO SET FEC CORRECTL 

‘ST ACO,AC1 FAILED IN THE FDST FLOWS. 
<CRLF>'THE (BUT FDST) FORK FAILED, TRAPPED TO 4." 
"ST ACO,AC1 FLOWS. 

"ST ACO,AC1 TRANSFERRED BAD DATA." 


"FPS BAD AFTER LDD (RO),ACO." 
<CRLF>\THE (BUT EZBT Y8) FORK FAILED.\ 


‘FPS BAD AFTER LDD (RO),ACO.' 


<CRLF>\THE (BUT ENBT) FORK FAILED.\ 
"LDD (RO),ACO TRAPPED TO 244. 
* FSR AND FI 


STATE 456. i0 354,° 
<CRLF>*INSTEAD OF FROM 256 TO 254." 
Na (RO) sag We TO TRAP TO 244,° 


<CRLF >’ THE (BUT ‘iw oo A 8s e *<CRLF> 
‘WENT FROM oie te 2 


1 

/LDCFD (RO),ACO LOADED BAD DATA./ 
/LDCDF (RO),ACO LOADED BAD DATA./ 
/ADDD (RO),ACO WITH (RO)=ACO=0 / 
/ADDF (RO),ACO WITH (RO)=ACO=0 / 
/SUBD (RO),ACO WITH (RO)=ACO=0 / 
/SUBF (RO),ACO WITH (RO)=ACO=0 / 


/ADDD (RO),ACO WITH (RO)=0 / 
/SUBD (RO),ACO WITH (RO)=0 / 


mee eee ee ee 
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6815 057674 EM147: 
057676 \¢3 125 102 eASCIZ /SUBD (RO),ACO WITH ACO=0 / 
6816 057674 EM1S0=EM147 
6817 057674 —EM151=EM147 
6818 $5772 EM152: 
057726 101 104 104 eASCIZ /ADDD (RO),ACO WITH ACO=0 / 
6819 057726 EM153=EM152 
6820 057760 EM154: 
0577 101 116 040 -ASCII ‘AN OVERFLOW ote OCCURRED ON ADD'<CRLF> 
0600 ‘ 103 101 125 ASCII * CAUS ING A TRAP TO 244." 
0600 $30 050 102 -ASCII <CRLF>* (BUT EZBT Y9 v8) FORK IN STATE 420 Of OVER\UNDER FAILED. 
060141 00 123 110 eASCIZ <CRLF>*SHOULD HAVE GONE FROM STATE 420 TO 131. 
6821 06021 —M155: 
06021 101 116 040 eASCII ‘AN UNDERFLOW ~~ OCCURRED ON ADD‘'<CRLF> 
06025 103 101 125 -ASCII * CAUSING A TRAP TO 244.° 
060303 200 050 102 -ASCII <CRLF>* (BUT e7BT YY v8) FORK IN STATE 429 - OVER\UNDER FAILED. ° 
060374 200 123 110 eASCIZ <CRLF>*SHOULD HAVE GONE FROM STATE 420 TC 131. 
6822 060445 EM156: 
060445 101 104 104 eASCII /ADDD (RO) ~ACO FAILED IN THE ROUND \ TRUNK FLOWS ./ 
060523 200 124 110 eASCII <CRLF>‘THE (BUT FD) FORK ar WENT’ 
060562 106 122 117 -ASCII \FROM STATE 665 TO 113.\<C 
060611 117 116 123 -ASCIZ \INSTEAD OF FROM 665 TO Sis Acoma F> Val Te FT SET.N 
6823 060662 EM157: 
060662 101 104 104 eASCII /ADDD (RO) ,ACO FAILED IN THE gy FLOWS./ 
060740 200 124 110 eASCII] <CRLF>"*THE (BUT FD) FORK as. WENT 
060777 106 122 117 -ASCII \FROM STATE 665 TO 313.\ 
061026 111 116 123 -ASCIZ \INSTEAD OF FROM 665 TO \sSht NORE > Val TH FT CLEAR.\ 
6824 061101 EM160: 
061101 101 104 104 -ASCII /ADDD (RO),ACO FAILED IN THE ROUND\TRUNK FLOWS./<CRLF> 
061160 124 110 105 -ASCII ‘THE FLOATING CONSTANT WAS USED INSTEAD OF THE DOUBLE CONSTANT'<CRLF> 
901 628 117 116 040 eASCIZ ‘IN THE ROUND ALGORITHM. ' 
6825 061306 EM161: 
Pel act 101 104 104 ASCII /ADDF (RO),ACO FAILED IN THE ROUND\TRUNK FLOWS./<CRLF 
06136 124 110 105 eASCII ‘THE DOUBL E CONSTANT _ USED INSTEAD OF THE FLOATING CONSTANT '<CRLF> 
061463 111 116 040 eASCIZ ‘IN THE ROUND ALGORITHM 
6826 061513 EM162: 
061513 101 104 104 ASCIZ /ADDD (RO),ACO PRODUCED A BAD RESULT./ 
6827 061560 EM163: 
061560 101 104 104 -ASCIZ /ADDF (RO),ACO PRODUCED A BAD RESULT./ 
6828 061625 EM164: 
061625 124 110 105 -ASCIZ \THE FPS WAS BAD AFTER ADDD (RO),ACO.\ 
6829 061672 EM165: 
19/6 124 110 105 eASCIZ \THE FPS WAS BAD AFTER ADDF (RO),ACO.\ 
6830 3 EM166: 
061737 101 104 104 -ASCII /ADDD (RO),ACO PRODUCED A BAD RESULT, /<CRLF> 
120 122 117 -ASCIZ ‘PROBABLE ERROR IN THE ALIGN FLOWS.‘ 
6831 062047 EM167: 
06 7 101 104 104 eASCII /ADDD (RO) ace FAILED IN THE ALIGN FLOWS./<CRLF> 
062120 106 114 117 eASCII \FLOW DID FOLLOW THE PATH: STATE 476, TO 111, TO 014.\ 
12 200 101 040 ASCII <CRLr>\A BAD T CONSTANT (NOT 57 DEC) \ 
6832 4 127 101 123 EM170 eASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' 
101 104 104 -ASCI] /ADDF (RO),ACO PRODUCED A BAD RESULT, /<CRLF> 
3 120 122 117 eASCIZ ‘PROBABLE ERROR IN THE ALIGN FLOWS.’ 
6833 416 EM171: 
41 101 104 104 -ASCII /ADDF (RO),ACO FAILED IN THE ALIGN FLOWS. /<CRLF> 
06246 106 114 117 eASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 111, 79 014.\ 
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<CRLF>\A BAD CONSTANT (NOT 25 DEC) 


—_— 
® 
Wo 
> 
mn 


1 EM210: . 
0 EM211=EM5 
4 EM212=EM6 
6 EM213=EM7 
EM214: 


557 200 01 CI] 
614 12 01 12 -ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' 
6834 062655 EM172: : 
$35 101 104 104 ASCII /ADDD (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
26 106 114 117 ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 015.\ | 
16 206 101 040 ASCII <CRLF>\A BAD CONSTANT (NOT 57 DEC) \ | 
06305 127 101 123 .ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' | 
6835 063114 EM173: | 
063114 101 104 104 ASCII /ADDD (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
06 162 106 114 117 ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 215.\ 
063255 200 101 040 ASCII <CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 
06 1¢ 127 101 123 -ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' | 
6836 5 EM174: 
063353 101 104 104 ASCII /ADDF (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> i | 
063424 106 114 117 ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 015.\ | 
063514 200 101 040 ASCII <CRLF>\A BAD CONSTANT (NOT 25 DEC) \ Z 
063551 127 101 123 -ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' | 
6837 06361 —M175: | 
06 1 101 104 104 ASCII /ADDF (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> | 
106 114 117 ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011. TO 215.\ | 
06375 200 101 040 «ASCII <CRLF>\A BAD CONSTANT (NOT 25 DEC) \ | 
064010 127 101 123 -ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM. ' | 
6838 064051 EM176: | 
064051 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> l 
5, 104 111 104 -ASCIZ \DID NOT_TAKE THE PATH: STATE 216, TO 442, TO 500.\ | 
6839 $6 06 120 117 127 aileg ’ ASCIZ ‘POWER ITOR BIT FOUND SET‘ - 
064242 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> | 
64315 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 121.\ | 
6841 064377 EM201: ‘ | 
+ 0 44 101 104 104 ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> | 
64452 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 101.\ | 
6842 064534 EM202: »| | 
064534 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> | 
64607 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 042, TO 101.\ | 
6843 064671 EM203: | 
064671 101 104 104 -ASCII 'ADDD (RO);ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> | 
966 44 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 141.\ | 
6844 065026 EM204: | 
65026 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> | 
5101 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 042, TO 141.\ | 
6845 065163 EM205: | 
p62! 3 124 110 105 -ASCIZ \THE FPS WAS BAD AFTER SUBD (RO),ACO.\ | 
6846 065 EM206: [ 
062 3 125 102 -ASCIZ /SUBD (RO),ACO PRODUCED A BAD RESULT./ | 
on67 3 125° 102 EM207: .ASCII ‘SUBD (RO),ACO PRODUCED A BAD RESULT." 
: oe 41 0 124° 110 -ASCIZ <CRLF>*THE XOR OF THE SIGN BIT FAILED IN STATE 024.' 
oper 5417 104 104 ASCIZ ‘ADDD (RO),ACO FAILED IN THE NORMALIZE FLOWS.' : 
i 
¢ 
{ 
H 
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124 
060 


DH3: ASCII 


DHS: -ASC 
DHo=DH5 
DH7=DH5 
DH1G=DHS 
DH11=DH5 
DH12=-0 
DH13=0 
DH14=DH5 
DH15=DH5 
DH16: AS 


A 
DH17: -A 
DH20: .A 
DH21=DH5_ 
DH22: 


DH23: ‘ 


i 
WWMM 


s 
>>r>>r>r >} 
Vwnnwnnwn wn 
AAAOAAAAIA AQAQGAANY 


DH24: .AS 


DH25: ; 
DH26: AS 


DH2? =DH26 
DH 
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"ADDD (RO>,ACO FAILED IN THE ADD-SUB FLOWS. me > 
\DID NOT TAKE THE PATH: STATE 216, TO 042, TO 1 


DATA HEADERS 


"ate ST. * <TAB>*PC OF agg Pe aa e ERROR. ° 
<TAB>* WROTE ."<TAB> "READ. '<TAB>' EXP 
* TEST.*<TAB>*PC OF Cog TL hae oF ERROR. ' 
"AND BAD DATA.*<TAB>'OR BAD DAT 

"FEST. *<TAB>*PC OF CALL. '<TAB>'PC ,OF ERROR. * 
<TAB>*READ PSW. *<TAB>*EXPECTE 

" IES *<TAB>*PC OF 
<TAB>*WROTE FPS. *<TAB>'FPS AFTER CFCC. 

* TEST. *<TAB>"PC OF CALL.*<TAS>'PC OF TRAP." 


* TEST. *<TAB>'PC ae CALL.*<TAB>'PC OF ERROR." 
" <TAB>*PC OF ERROR." 


<TAB>' OP CODE. 

. TEST. + CTABS "PC OF CALL. 
<TAB>*GOT FPS. °<TAB>’ EXPECTED FPS. 
* TEST.*<TAB>'PC OF 
<TAB>*PC OF STST. "<TAB> READ F 


"FAILED TO CORRECTLY SET FPS.° 
‘FAILED 1e CORRECTLY SET FEC TO 000002. *<CRLF > 
<TAB>*PC CALL. <a s* OF ERROR.’ 
<TAB>'PC Y STST.°<TAB> READ FEC.’ 
"TRAPPED TO 244. FLOW WENT FROM STATE 238 TO STATE 430.' 
<CRLF>* INSTEAD OF FROM STATE 554 TO STATE 432." 
TEST.*<TAB>'PC OF CALL.‘<TAB>'PC OF ERROR. ‘ <TAB> 
' TEST. "<TAB>'PC OF CALL. *<TAB>'PC OF ERROR,’ 
<TAB>'GOT RO.°<TAB>*EXPECTED RO.° 


TEST."* 


* TEST.*<TAB>*PC OF CALL. *<TAB>'PC OF ERROR. ' 
<TAB>'RO (TARGET LOCATIONS FOR OUTPUT).' 


"LEST." <TAB>*PC OF CALL. *<TAB>*PC , TRAP. * 
<TAB>’RO (TARGET LOCATIONS FOR OUTPUT) 


ERROR 


<TAB>* WITH F 


D PSw.° 
CALL. *<TAB>* ee OF ERROR. . 


CALL. edhe. OF TRAP." 


SUMMARY . 
iEST.*<TAB>* CALL AT PC.’ 
*. Fest. 7) OF CALL.*<TAB>*PC OF ERROR.’ 


SE QUE NCE 


1or 


1 
aspen fo"*6 £ °S Cy? BAM A A080 7113 20-OCT-87 08:47 PAG Sas] SEQUENCE 
oe a ee a 


“905 347637 DH517=DHS0 
43°: 0 oo D¥52=DH5S 
oi;  gry73 DH5 3=DH26 
$7"5 567563 € 240 124 DwS6: eASCIZ °* TEST.*°<TABD>*PC OF CALL.°<TAB>'PC CF ERROR. ' 
6915 966 1 D¥55=DHS | 
659°6 06 b: DH56=DH26 
69'5 96750 DH57=DH54 
67's igh te a 
49° 64750 DH61=DH54 
597°8 0-7503 DH62=DHS4 
6919 067503 DH6 3=DH54 
6920 067544 1e¢ 105 123 DH65: ASCII RESULTING IN AN ODD ADDRESS TRAP TO 4." 
6921 906761 ASCII <CRL 
6922 0676! 40 040 124 DH646: ~ 3) a TEST. *<TAB>'PC OF CALL. *<TAB>’ PC OF ERROR.’ 
6923 067653 41 1G? 117 ASCIZ <TAB>‘*GOT PC.'<TAB>‘EXPECTED PC. 
6926 067503 DH66=DH54 
6925 DH67=DH5 
69 g sy DH70=DH5 
69 06 1 DH71=DH25 
69 067073 DH72=DH26 
69 067503 DH73=DH54 
6950 066201 DH74=DHS5 
6931 066201 DH75=DH5 
one 067031 DH76=DH25 
a) 067073 DH77=DH26 
6934 067503 DH100=DH54 
6975 06620 DH101=DH5 
6 067073 DH102=DH26 
69 067031 DH103=DH25 
6938 067503 DH104=DH54 
6939 01 DH105=DH5 
6940 067073 DH106=DH26 
6941 067031 DH107=DH25 
694 067503 DH110=DH54 
694 067031 0H1117=DH25 
6944 067701 124 110 105 DH112: .ASCII THE (BUT FSRC) FORK FAILED.'<CRLF> 
6945 5 aS 103 117 116 SCI] ONTROL WENT FROM STATE E 762 TO STATE 627." 
o9%8 8 site 200 117 116 -ASCII <CRLF >" INSTEAD OF FROM STATE 762 TO STATE Sr *<CRLF> 
6947 0700 040 040 124 -ASCIZ TEST. "<TAB>"PC OF CALL.‘<TAB>'PC OF ERR 
6948 067031 DH113=DH25 
6949 067701 DH114=DH112 
6950 070120 ie 110 105 H115: .ASCII] ‘THE (BUT FSRO) ox. nantes ie Ue Be IN AN ODD soeer 38 TRAP 70 4," 
6951 070221 200 103 117 -ASCI] <CRLF>*CONTROL WENT FROM STATE 762 TO ST op 1H .*<CRLF 
69 $ 0 4 117 116 123 ASCII es a OF FROM STATE 762 TO STATE 627.°<C 
6953 070344 040 040 124 — TEST. °<TAB>'PC OF CALL.'<‘AB>*PC OF Fs tf 
prorsy DH116=DH11 
321 DH117=DH17 
6956 Ode 040 040 124 DH120: .ASCI] °* TEST.*<TAB>'PC OF CALL.'<TAB>'PC OF ERROR.’ 
695 70444 Hh 107 117 Ni2t: we <TAB>*GOT FEC. °<TAB>*EXPECTED FEC.° 
$328 erat byt =DH50 
$966 067431 DH123=DH50 
6961 066321 DH124=DH17 
58 3635 BHI S¢=DHS. 
6964 06 35 DH127=DH54 


DH130=DH120 


o 
g 
3 
z 


a rc eee; 


6 
£378 70404 


6984 070774 
6985 071024 


69 
. 
6989 071065 


071125 


767803 
06 


Ro 
™~ 


SRESR BOROROS 
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3 
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040 


040 
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122 
124 


124 


126 


DH131=DH54 


4 
sASCIZ 
5 


DH214=DH54 


*FA] 
T 


TEST. *<TAB>* F CALL. 


*<TAB> ‘PC OF 


LED TO PRODUCE THE CORRECT RESULTS. °<CALF> 
EST.°<TAB>*PC OF CALL. 


ERROR. * 


<TAB>*PC OF 


<TAB>*GOT FPS. :CTABD "EXPECTED FPS. 


‘XOR OF SIGN BIT FAILED. *<CRLF> 


TEST.*<TAB>'PC OF CALL. 


TEST. *<TAB>*PC OF CALL. 


TEST. 


TEST.*<TAB>*PC OF CALL. 


*<TAB>'PC OF ERROR." 


*<TAB>'PC OF TRAP." 


ERR PC CPU ERROR REGISTER’ 


*<TAB>'PC OF TRAP. "<TAB>'FEC.* 


SEQUENCE 


‘PRODUCED THE as RESULT BUT PC OF ERROR. * THE FPS CORRECTLY." 


172 
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DATA FORMATS 


_SBTTL DATA FORMATS 
0772%6 006 v00 005 DFI: “BYTE 4.0.5,0.5.0,0.0 
Q 571546 000 005 DF2: ‘BYTE 420°5°6°5°0°5°0 
5 071256 000 005 pF3: “BYTE 4,0.5.0.5.0.5.0 
071 DFG=DF3 
071206 000 OCS OFS: .BYTE 4,0.5,0.5.0,5.11.5.0,5.0 
0 071266 DF6=DFS 
70 971266 DF 7=DF5 
? 07* 266 DF 10=DF5 
7631 071 Be DFIIT=DFS 
70 071 2 _ 00 011 005 AGS -BYTE 50 1165.5.544 55 0455550455045 411,5.11,5,5,4,0,5,0,5,0,0 
70 071 5 011 005 DF Ps BYTE §.11,5.5,5.4.0.5.0.5.9.0 
70 071266 DF 14=DF6 
7035 071266 DF 1S5=DF6 
7036 071350 904 000 005 DF16: .BYTE 4.0.5.0.5.0.0 
? 071256 DF 17=DF3 
7038 071357 004 000 005 DF20: .BYTE 4.0.5.0.5.0.5,0 
7039 071367 004 000 005 DF21: .BYTE 4.0.5.0 
7040 071373 005 005 004 DF22: . BYTE 5.5.4.0.5.0,.5.0.5.0 
7041 071 004 000 005 DF23: .BYTE 4.0.5.0.5.0.5.0 
? é 071415 005 004 000 DF24: <cBYTE 5.4.0.5.0.5.0 
7043 071426 004 000 005 DF25: .BYTE 4,0.5.0.5.5.5.0,5.0.5.0.5.5.5,0.5.0.5.0 
7044 071450 004 000 005 DF 26: BYTE 4.0.5.0,5.0.0,5 5.5.5 ,4.5 4455030503 0%e5e% 
7045 0714675 004 000 005 OF27: . BYTE 4.0.5.0.5.0.0.5.5.5.5.6.5.6.5.5 
7066 071515 005 011 005 DF30: 5.11,5,5,5,4,0,5,5,5-0,0 
704 071450 DF 31=DF 26 
7068 071675 DF 32=DF 27 
7049 071531 004 000 005 DF33: .BYTE 4,0,5,0.5.0.5.5,.5.0,5.0.5.12,5.5,.5.0,5.0,.5.12 
7050 071557 904 000 005 DF34: .BYTE 4.0.5.0.5.0.5.5.5.5.6.5.6.5,55555 56,556 
7051 071557 OF 35=DF 34 
705 071557 DF 36=DF 34 
705 071557 DF 37=DF 34 
7054 071603 004 000 005 DF40: .BYTE 4,0,5,0.5.0,.5,5.5.0.5-.0.5+3-5,5-5-0.5.0,5.3 
7055 071631 011 005 005 pF41: BYTE 11,5.§.5°4.6.5 6.5 6.5.6 
7056 071645 004 000 005 poF42: BYTE 4,0,5.6.5.6.5.5,5.5.4.5.4.11.4.5.5.5.5.4.5.4 
705 071645 DF435=DF42 
moe rg Bs BBE BS! BME EU SSSA DSR EE SSIES EES 
0 07174 04 000 005 pF46: BYTE 4,0,5.5.5.3,5.3.5,%.5.3.5.3.5.5.5.8.5.3.5.3.5.3.5.3 
7061 071775 004 000 DF47: BYTE 4,0,5.0.5.5.5.46.5.46.5.5 
7062 72012 004 000 005 DF5O0: BYTE  4,0,5.0.5.14 5555550504 555455555555 5455 56 
7063 072036 000 005 DF51: . BYTE 4.0.5.0.5.11.5.5.5.3.5.5.5.3 
7064 071775 DF 52=DF 47 
7065 072054 000 005 DF53:  . BYTE 4,.0.5.0.5.0.0 
06 004 000 005 DF54: .BYTE 4.0.5.0.5.5.5.5,3.5555.543 
071775 DFSS=DF47 
7068 072054 DF 56=DF53 
706 072063 DF 57=DF 54 
7070 072054 DF 60=DF53 
707) 072063 DF61=DF 54 
7 072063 DF 62=DF 54 
707 072063 DF 63=DF 54 
7074 072101 004 000 005 DF64: .BYTE 4,0.5.0.5.0.0 
75 0721 1 DF 65=DF 64 
26 07 065 DF 66=DF 54 
? 07136 DF 67=DF 21 
78 072110 004 000 OCS DF70: .BYTE 4,0.5.0.5.5.5.50455045505555554555% 
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042740 
001240 
042740 


043141 


001240 


042740 
042740 
000000 
042740 


042740 


000000 — 


042740 
000000 


042740 
0 0 


066014 


.SABTTL 
DT1: . WORD 
. WORD 
DI2: . WORD 
DT3: . WORD 
. WORD 
DT4=DT 
DTS: . WORD 
. WORD 
DTé6: WORD 
DT7=DT6 
DT10=DT6 
DT11=DT6 
D112: WORD 
. WORD 
. WORD 
. WORD 
DT13 . WORD 
. WORD 
DT14=DT6 
DT15=DT6 
DT16: . WORD 
DT17=DT3 
DT20: . WORD 
. WORD 
PT21 . WORD 
DT22 . WORD 
. WORD 
. WORD 
DT23: . WORD 
m7 WORD 
D124: . WORD 
. WORD 
. WORD 
DT25: WORD 
. WORD 
DT26: . WORD 
. WORD 
. WORD 
DT27: . WORD 
. WORD 
DT30 . WORD 
WORD 
01T31=DT26 
DT32=DT27 
DT33: WORD 
o WORD 
. WORD 
D134: . WORD 
WORD 
DI 35=DT34 
DT 36=DT 34 
D137=DT34 
DT40=DT33 
DT41 . WORD 


SEQUENCE 


DATA TABLES 
STMPO,.STMP1. STAB, STMP2, STAB, STMPS 

STMP4-$TMPS. 

STMPO,$TMP1,$TAB,AERFLG.$TAB, $IMP2,$TAB,STMP3, 0 
STMPO,S$TMP1.$TAB,SIMP2, $TAB, $TMP3 

$TAB, $TMP4 ,0 


STMPO,$TMP1,.$TAB,STMP2,LFIEX1,$7MP21,LFIEXZ 
$TMP20, FPSMS.$TMP3,FECMS,$TMP4.0 
STMPO, $TMP1,$TAB,$IMP2,LFIEX1,$TMP21.LFIEX2.$1MP20,0 


STHE,$TMP10,NOOP1,NOOP15,NOOP2, $TMPS 

NOOPS, $TMP6.NOOP4 .NOOP2,$TMP5,NOOP3,$TMP7.NOOPS.$TMP11 
NOOP6.$TMP10,NOOP?,NOOP10,$TMPO,$TMP1.$TAB, $TMP2 
$TAB, $TMP3,$TMP4,0 

STHE.$TMP10,NOOP1 ,NOOP11,NOOP10,$TMPO.$TMP1.$TAB 
STMP2,$TAB, $TMP3,$TMP4 , 0 


STMPO,STMP1,STAB,STMP2,$TAB,STMPS ,STMP3,0 


STMPO,S$TMP1,.$TAB,STMP2,$TAB, STMP3 
STAB, $TMP4, 
STMPO,STMP1,$TAB,STMP2,0 

H3,$CRLF 


D ra L 
$TMPO,STMP1,$TAB,STMP2,$TAB, $TMP3 
AB. $TMP4 0 
$TAB,STMP2,$TAB, STMP3 


$TMPO, STMP1 
STAB, STMP4 0 


ILLMS 
STMPO ,STMP1 STAB, STMP2,$TAB,STMP3 


TAB, $TMP 
STMPO,$TMP1, STAB, SCRLF .MS1,MS3,$TMP3.MS4,STMP4 .S$CRLF 
STMP4 ,SCRLF .MS2.MS3,$TMP5.MS4,$TMP6,$CRLF.STMPS5 ,0 
STMPO,STMP1,$TAB, STMP2,$TAB, STIMP3,$TMP4,SCRLF 
MS6,$CRLF.MS7,$TMP5.MS10.$TMP6.$CRLF 

msi SCRLF .MS7,$TMP5.MS10,$TMP7,0 


MPO, $TMP1.$TAB,STMP2. STAR. STMP3 
STMP4,.SCRLF .MS12,$CRLF .MS7,$TMP5,MS10,$TMP7,$CRLF .MS13.0 
MS15,$TMP20,$CRLF.MS14,$CRLF 
SIMO. STHP1 STAB, STMP2, STAB, STMPS 


STMPO,STMP1,STAB,S$TMP2,$TAB, STMP3 

SCRLF .MS1,MS3,$TMP4,MS4,STMP5,SCRLF,.STMP6,SCRLF 
$2,MS3,$1MP4.MS4,$TMP5.$CRLF.$TMP4.0 
STMPO,$TMP1,$TAB, $TIMP2,$TAB, STMPS 

SCRLF .MS6,$CRLF..MS7.$TMP5.MS10,$TMP6, SCRLF 

MS11,$CRLF,MS7.$TMP5,.MS10.$TMP?,0 


$TMP20,$CRLF ,DH3,$CRLF 
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SEQUENCE 1/77 


DATA TABLES 
7221 07332 901332 061234 042740 .WORD $ITMPO,S$TMP1.$TAB.$TMP2,$TAB,STMP3 
? é 07 042740 001242 “WORD  $TAB.$T 
7223 073350 001232 001234 042740 DI42: :WORD $TMPO,S$TMP1.STAB.STMP2.$TAB.STMP3 
2226 07 001313 044 33 001313 -WORD $CRLF.MS6,SCRLF.MS7,$TMPS _MS10,$TMP6,$TMP15.$TMP10 
? 5 07 001 13 044270 007313 a prg3Hore SCRLF.MS11,S$CRLF.MS7,$TMP5 .MS10,$TMP?,0 
? $ 073426 044519 001244 001313 DT44: WORD MS17 STMPSSCRLE .MS20, SCRLF STMPO,$TMP1.$TAB, $TMP2 
7228 073450 001313 044101 044641 -WORD  $CRLF,MS1,MS21,$CRLF,$TMP3,$CRLF .MS2,MS21,$CRLF.SIMP4,.0 
7229 073476 044510 001244 001313 DI45: WORD MS17.$TMP5,S$CRLF.MS24,$CRLF,.$TMPO,STMP1 STAB, STMPC STAB 
7230 073522 0912466 001313 044700 | “WOR TMP6, SCRLF .MS22.MS21.$CRLF.$TMP3.$CRLF 
7231 073540 044 044641 001313 “WORD MS23,MS21,$CRLF,$TMP4.0 
? é 07355 001232 001254 001313 DI46: {WORD $TMPO STMP1 -SCRLF .MS25 S30 STMP2.MS31,$1TMP3 
7238 073572 045136 001242 045145 “WORD MS32,$TMP4,MS33,STMP5 .MS34,$TMP6, SCRLF .MS26 
7234 07361 045120 001250 045127 “WORD S30.$TMP7.MS31.$TMP10 
7235 073622 045136 001254 045145 “WORD MS32,$TMP11,.MS33,$TMP12,MS34,$TMP13,0 
7236 073640 001252 001234 042740 DT47: WORD STMPO, STMP STAB. SIMP2,SCRLF ,MS12,MS7.STMPS,MS10 
7237 073662 001262 001313 044353 .WORD $TMP4,$CRLF,MS13,0 
7238 073264 DT50=DT34 
7239 073672 001252 001234 042740 D151: .WORD $TMPO,$TMP1,$TAB,$TMP2.$TAB,STMP3 
7240 073706 001313 045052 045111 ; SCRLF .MS25,MS27,$TMP4, $CRLF .MS26.MS27.$TMP5,0 
7261 073640 DT52=DT47 
724 073730 001232 001234 042740 DT53: . STMPO,STMP1,$TAB,$TMP2,$TAB, STMP3 
7263 073744 001242 000000 “WORD  $TMP4. 
7244 073750 001232 001234 042740 D154: .WORD $TMPO.$TMP1,$TAB,STMP2.$CRLF.MS1.MS21.$CRLF.$TMP3 
7245 073772 001313 044113 044641 .WORD $CRLF.MS2,MS21,$C&LF.$TMP3,0 
7266 073640 DT55=DT47 
7267 073730 0756=DT53 
7268 073750 DT57=DT54 
7249 073730 DT60=DT53 
7250 073750 DT61=DT54 
7251 073750 DT62=DT54 
7259 073750 DT63=DT54 
7253 074006 001232 001234 042740 D164: .WORD $TMPO,$TMP1,$TAB.S$TMP2,$TAB.STMP3 
7254 074022 001242 000000 ' STMP4 0 
7255 074006 DT65=DT64 | 
7256 073750 DT66=DT54 
7257 72640 DT67=DT21 
7258 074026 001232 001234 042740 DT70: STMPO.STMP1,$TAB,$TMP2,$CRLF .MS6,$CRLF .MS7,$TMP5S 
7259 074050 044255 001246 001313 el MS10,$TMP6,$CRLF .MS11,$CRLF .MS7,$TMP5 ,MS10.$TMP7,0 
7361 074074 001232 001234 042740 DT72: STMPO, $TMP1,$TAB,$TMP2,$TAB, STMP3, STMP4 0 
7 62 073750 DT73=DT54 
726 072640 DT74=DT21 
7264 074026 T75=DT70 
7265 074026 DT76=DT70 
? 66 074074 DT77=DT72 
726 073750 DT100=DT54 
7268 074026 01101=DT70 
? 69 074026 D1102=DT71 
7270 074026 D1103=DT70 
7271 073750 01104=DT54 
727 074026 DT105=DT70 
727 074074 D1106=DT72 
7 074026 01107=DT70 
7275 0737 DT110=DT54 
72% 074114 001232 001224 042740 DT111: . WORD $TMPO.$TMP1,$TAB.STMP2,0 
727 07411 DT112=DT111 
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DATA TABLES 
7278 074114 DT113=DT111 
7 074114 D1114=DT111 
7280 074114 DT115=DT111 
7281 076114 DI11G=DT111 
7 8 07 360 DT117=DT3 
? 07 D1120=DT3 
7 073640 DT121=D147 
7285 073244 D1122=DT34 
? 07367 07123=DT51 | 
7287 074126 09123 001234 042740 DT124: .WORD $TMPO,.$TMP1,$TAB,$TMP2.$TAB,$TMP3,$TMP4.SCRLF 
7288 074146 044 2 001313 044241 “WORD MS6,$CRLF.MS7,$TMP5.MS10,$TMP6.SCALF 
7289 074164 044270 001313 044241 -WORD MS11,$CRLF.MS7,$TMP5,MS10,$TMP7,$CRLF .MS37,$CRLF.$TMP10.0 
7 074126 DT125=DT124 
7291 074114 DT126=DT111 
7 32 074114 DT127=DT111 
? 072360 DT130=DT3 
729% 074212 0012 é 001234 042740 DT131: .WORD $TMPO,$TMP1,$TAB.$TMP2,$CRLF.MS37,$CRLF.$TMP3 
? 95 074232 00131 045215 001313 souaneitl SCRLF .MS40,$CRLF.$TMP4.S$CRLF.MS415,$CRLF,$TMP5,0 
7297 074254 001333 001234 042740 DT133: .WORD $TMPO,$TMP1,$TAB,STMP2,SCRLF.MS41.$CRLF.STMP3 
7298 074274 001313 045275 001313 “WORD $CRLF.MS42,$CRLF..$TMP4.$CRLF .MS43.$CRLF .$TMP5 
7299 074314 001313 045330 001313 “WORD $CRLF.MS44.$CRLF.$TMP6.0 
7 074254 D1134=DT133 
7301 074254 01135=DT133 
730 074254 DT136=DT133 
7303 074326 001232 001234 042740 DT137: .WORD $TMPO,$TMP1,$TAB,$TMP2,$TMP10.$TAB.$TMP11.0 
7304 074326 D1140=DT137 
7305 074326 DT141=DT137 
074326 DT142=DT137 
7307 074254 D1143=DT133 
7308 074254 DT144=DT133 
7309 074326 DT145=DT137 
7310 074326 DT146=DT137 
7311 074254 DT147=DT133 
7312 074254 DT150=DT133 
7313 074326 07151=DT137 
7314 074254 D1152=DT133 
7315 074326 D7153=D1137 
7316 074346 001232 001234 042740 DT154: .WORD $TMPO,$TMP1,$TAB,$TMP2.0 
7317 074346 D7155=D7154 
7318 074254 DT156=DT133 
7319 074254 D7157=DT133 
732 074254 D1160=DT132 
7 4 074254 DT161=D7133 
? é 074254 DT162=DT133 
732 074254 01163=DT133 
73 072360 DT164=DT3 
7325 072360 DT165=DT3 
73 6 074254 DT166=D7133 
z3 O74¢54 DT167=DT133 
7328 074254 DT170=DT133 
73 074254 DT171=DT133 
7 074254 DT172=07133 
? 31 074254 DT173=D1133 
7 : 074254 D1174=DT133 
733 074254 01175=DT133 
7334 074254 DT176=D1133 
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037142 


042740 
042740 


SEQUENCE 


DT177: 5 #ORD STMPO,STMP1,CPSAVE ,0 
DT200=DT13 


STMPO,STMP1,$TAB,STMP2,$TAB,STMP3,0 
T212: STMPO,STMP1,$TAB,STMP2,0 
D0T213=DT212 
DT214=DT133 
- END 
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Sy LE 
AADATO 027404 ADDW12= 000000 AG 004704 ERR1 005140 ccP2 03121 
027504 ADDwW13= 000000 A7 4730 BITSTS 014250 CCP 0313¢8 
AAERRO 027056 ADDW14= 000000 BBDATO 032526 ITO = 000001 CPG O5128¢ 
AAERR1 027124 ADDW15= 000000 032656 BITOO = 000001 CCPS5 O38 124 
AAERR2 027160 ADDue = 000000 BBERO 032214 BITO1 = 000002 CCP 031252 
AAERRS 027214 ADDW3 = 000000 R1 032254 BITO2 = 000004 CCP 3136 
AAE 7226 ADDW4 = 000000 BBER10 032234 BITO3 = 000010 (C1 027510 
AAERRS 027260 ADDWS = 000000 BBER11 032270 BIT04 = 000020 CC10 027734 
AAERR6 027314 ADDW6 = 000000 BBER2 032312 BITOS = 000040 CC11 027744 
AAERR? 027350 ADDW? = 000000 BBER3 032330 BIT06 = 000100 CC12 027752 
AAER10 02713 ADDWB = 000000 ER4 032364 BIT07 = 000200 CC13 027764 
AAPATO. 0276 14 ADDWS = BBER4O 032400 BITO8 = 000400 €C14 030020 
AAPAT 037626 ADEVCT= 000000 ERS 032420 BITO9 = 001000 CC15 030044 
MAPAT2 0274 EVM = 000000 BBER6 032436 BIT! = 000002 (C16 03 
MAPATS 027644 ADONE 005046 BBER? 032472 BIT10 = 002000 (C17 030074 
AAPAT4 027454 AENV = 000000 BBER8 032510 BITi1 = 004000 CC18 030102 
AAPATS 0) AENVM = 000000 BBPATO 032536 BIT12 = 010000 CC19 030114 
AAPAT6 027474 AERFLG 004736 BBPAT1 032546 BIT13 = 020000 CC2. 027544 
AAI 0266 AERR1 004740 BBPAT2 032556 BIT14 = 040000 €C20 030150 
AA10 —- 026562 AERR2 004752 BBPAT3 032566 BIT15 = 100000 CC21 030174 
AA11 6616 ERR3 005004 BBPAT4 032576 BIT2 = 000004 CC22 030214 
mAl2 026620 AFATAL= 000000 BBPATS 032606 BIT3 = 000010 CC23 030224 
AAT R1i= 000000 BBPAT6 032616 BIT4 = 000020 €€24 030232 
MA14 026656 R2= 000000 BBP10 032636 BITS = 000040 CC25 030244 
AAIS 026676 AMADR3= 000000 BBP11 032646 BIT6 = 000100 €C26 030300 
A160 AMADR4= 000000 BBP7 2626 BIT? = 000200 €C27 030322 
AA17? —s- 026710 AMAMS1= 000000 BB1 31326 BIT8 = 000400 CC28 030342 
AA2 026504 AMAMS2= 000000 BB10 031512 BIT9 = 001000 CC29 030352 
AA20 026714 AMAMS3= 000000 BB11 031532 BPTVEC= 000014 CC3 —-: 027566 
AA21 026716 AMAMS4= 000000 BB12 031542 BI 005064 CC30 030360 
mage §— 026794 AMSGAD= 000000 BB13. 031550 B2 005066 €€31 930372 
026756 AMSGLG= 000000 BB14 031562 B3 005104 CC32 © 030426 
MA24 026776 AMSGTY= 000000 BB15 031616 CCDATO 031162 CC33 030450 
AA25 027016 TYP1= 000000 BB16 031642 CCDONE 031322 €C34 03047 
maze 027024 AMTYP2= 000000 BB17 031652 CCERO 030524 CC35 030500 
AA 027030 TYP3= 000000 2. 031370 CCER1 030560 CC36 ©=—030506 
AA 026506 AMTYP4= 000000 BB20 031664 CCER10 031072 €C37, 030520 
AA, —«- 026524 APASS = 000000 BB21 031720 CCER11 031110 CC4 =» 027606 
AAS «026544 APRIOR= 000000 BB22 (031744 CCER12 031126 CCS = 027616 
AA 02655 APTCSU= 00004 BB23 «031764 CCERI3 031144 €C6 = 027624 
0265 APTENV= 000001 BB24 031774 CCER2 030616 €C7 27636 
ABASE = 000000 APTSIZ= 000200 BB25 - 032002 CCER22 030632 €C8 027672 
ACDW1 = 000000 APTSPO= 000100 BBe6 =: 032014 CCER3 030654 CC9 =: 027714 
ACDu2 = 900000 ASWREG= 000000 BB27 2050 CCER4 030672 CDONE 120 
ACPUOP= ATESTN= 000000 BBS ss 031374 CCERG4 030706 CERRI 005654 
ACO =%000000 AUNIT = 000000 BB30 032072 CCERS 030730 CERR2 005752 
AC1 =%000001 AUSWR = 000000 BB31 032102 CCERSO 030574 CERR3 006052 
aCe =£000002 AVECT1= 000000 BB32. 032114 CCERSS 030744 CERR4 006 
AC3 =%00000 AVECT2= 000000 8833032150 CCER6 030764 CFCC] 04367 
aCe =3000004 AOS 004654 BB34 032172 CCERZ 051020 CHPNUM 014150 
ACS  =%000005 1 26 BB35 032202 CCER8 031036 CKSWR = 104407 
ACé = %000006 All 004526 BBL = 031412. CCER9O 030542 CNT = 000214 
AC? _ =%000007 12. 004542 BBS  —-031422 CCPO ©: 031172 CPC =: 006116 
ADDWO = 000000 600 BB6 3=s«03 1434 CCP} 051202 CPSAVE 037142 
ADDW1 = 000000 A 004604 BB? —ss«031470 CCP10 03127 CPSPUR 042566 
10= 000000 Ad 004652 BDONE 005154 CCPI1 051302 PTWO 042604 
ADDW11= 000000 A5 004656 BERR 005110 CCP12 03131 CR = 000015 
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CRLF = 0 DD21 033340 DF130 = 071256 DF212 = 072305 DH101 = 066201 
C1 8051 72 DD22 03 369 DF131 072176 F518 = 079308 oat = 087075 
C15 005222 DD25 033406 DF 132 = 072176 DF214 = pregis DH105 = (067031 
C 00524 DD24 033430 DF133 072216 oF $6 07137 DH104 = 067503 
C25 00526 DD25 033450 DF 134 = 072216 DFe 071405 CH105 = $91 
C 00531 DD26 033460 DF135 = 072216 DF 24 071415 DH106 = 067973 
¢35 905 340 oi 033466 DF 136 = 072216 DF25 071424 DH107 = 067031 
C4 005 DD Oehc cn DF137 4 =©6072242 DF 26 071450 DHi? = beeen 
45 0054 0D30 033500 OF14 = 071266 DF 27 071475 DH110 = 067503 
5 005426 DD31 033534 bF140 = 072242 DF 3 071256 DH111 = 067031 
55 005454 DD32 033556 DF141 = 072242 DF 30 071515 DH112 = 067701 
6 eeate DD33 033576 DF142 = 072242 DF31 = 071450 DH113 = 067031 
C95 5514 DD34 033606 DF143 = 072216 DF32 = 071475 DH114 = 067701 
Onee fs DD35 033614 DF144 = 072216 DF 33 071531 DH115 070120 
C75 00557 DD36 033632 tte = 072242 DF 34 071557 DH116 = 070120 
c8 Op ee $s DD37 033666 F146 = 072242 DF35 = 071557 DH117 = 066321 
c85 ? r4 0D38 033710 DF147 = 072216 DF36 = 071557 DHi2 = 0 
DDDATO 034556 DD39 033730 DF15_ = 071266 DF37 = 071557 DH120 070404 
DD 034706 4 032760 DF150 = 072216 DF4 = 071256 DH121 = 20 
DDERO 3770 DD40 033740 DF151 = 072242 DF40 071603 DH122 = 067431 
DDER' 006 DD41 033746 DF152 = 072216 DF41 071631 DH123 = 067431 
DDERIO 034424 DD42 033764 DF153 = 072242 DF42 071645 DH124 = 06632 
DDER11 0 256 DD5 032770 DF154 072252 DF43 = 071645 DH125 = (066321 
DDER12 03452 DD6 032776 DF155 = 072252 DF44 071673 DH126 = 06620 
DDER 034044 DD? 033014 DF156 = 072216 DF45 071716 DH127 = 067503 
DDER 034102 DD8 033050 DF157 = 072216 DF 46 071743 DH15_ = 
DDER4 Ber ise DERR1 006246 DF 16 071350 DF47 071775 DH130 = 070404 
DDERS 0354176 DERR2 006342 DF160 = 072216 DF5 071266 DH131 = 067503 
DDER 034234 DF 071236 DF161 072256 DF50 072012 DH132 = 067503 
DDER 034272 DF10 = 071266 DF162 = 072216 DF51 072036 DH135 070474 
DDER8 034350 DF100 = 072063 DF163 = 072256 DF52 071775 DH134 = 070474 
DDER9 034366 DF101 = 072110 DF164 = 071256 DF53 072054 DH135 = 070474 
DDISP = 177570 DF102 = 072132 DF165 = 071256 DF54 072063 DH136 = 070474 
0 006366 DF103 = 072110 DF166 = 072216 DF55 = 071775 DH137 07 
DDPO 034566 DF104 = 072063 DF167 = 072216 DF56 = 072054 DH14 = 066201 
ODP 1 034576 DF105 = 072110 DF17 = 071256 DF57 = 072063 DH140 = 070604 
peat 034606 DF106 = 072132 DF170 = 072256 DF6 = 071266 DH141 = 070604 
DOP 034616 DF107 = 072110 DF171 = 072256 DF60 = 072054 DH142 = 070604 
DDP4 perce DF11_ = 071266 DF172 = 072216 DF61 = 072063 DH143 = 070474 
DDP5 0346 DF110 = 072063 DF173 = orssie DF62 = 072063 DH144 = 070474 
DDP 034646 - DF11* 072141 DF174 = 072256 DF63 = 072063 DH145 = 070604 
DDP 034656 DF112 = 072141 DF175 = 072256 DF 64 072101 DH146 = 070604 
DDP8 tree DF113 = 072141 DF176 = 0o5$a5 DF65 = 072101 DH147 = 067503 
DDP9 0346 § DF114 = 072141 DF177 =©072302 DF66 = 072063 DH15 = 066201 
DD! 83906 DF115 = 072141 DF2 071246 DF67 = 071367 DH150 §8=©070774 
0D10 033072 DF116 = 072141 F20 071357 F7 = 071266 DH151 = 070604 
DD11 bas, 2 DF117 = 071256 DF200 = 072216 DF70 072110 DH152 = 070474 
pore 33120 DF12 071302 DF201 = 072216 DF71 = 072110 DH153 = 070604 
DD1 033154 DF120 = 071256 DF202 = 072216 DF72 072132 DH154 071065 
DD14 stare DF121 = 071775 DF203 = 072216 DF73 = 072063 DH155 = 071065 
DD15 33206 DF122 = 072012 DF204 = 072216 DF74 = 071367 DH156 = 067503 
pois 33224 DF123 = 072036 DF205 = 071256 DF75 = 072110 DH157 = 067503 
0D1 33260 DF124 072145 DF206 = 072216 DF76 = 072110 DH16 poeen | 
bois 33 3 DF125 = 072145 DF207 = Osho DF77 = 072132 DH160 = 067503 
0D1 32 DF126 = 072141 DF 21 071367 DH1 065631 DH161 = 067503 
4 $8545 A = 072141 DF210 = 072216 DH10 = poeen | DH162 = 067503 
DD20 033332 DF 071334 DF211 072305 DH100 = 067503 DH1635 = 067505 
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SYMBOL TABLE 
DHIG4 = 066521 DhS3 = 067073 DT131 074212 D1213 = 074406 Dé 006206 
DHI6S = : . DHSs 067503 D1132 = 076212 DT914 = 074254 DS 006216 
DHI66 = 067503 OH33 = 066201 DT133 074954 D192. «072652 D6 006232 

187 = 06750 DHS = 067073 DT134 = 074954 DT9$.—«0 79700 D7 00654 
DHT i DHS? = 067503 DT135 = 074954 DT94 «79722 re 00631 
04170 = 06750 DH = 066201 DT136 = 074954 tT9s 079746 D9 006324 
DHI7) = 0675 DH60 = 067073 DT13? 074326 D196 «78016 EDONE 006532 

DHIZe = 06750 DH61 = 067503 DT14 = 072434 D9? «73072 EEDATO 035410 
DHI7$ = 06750 DH62 = 067503 DT140 = 074326 DTS. «072360 EEDONE 035472 
DHI74 = 06750 DH6S = 067503 DT141 = 074396 D130 «073134 EEERO 035202 
DHI75 = 06750 DH64 067613 DT142 = 074396 Li?? = 073016 EEER] 035220 
On176 = 087503 DH6S «067544 DT143 = 074254 D1*2 = 073072 EEER? 035956 
DHI7? 0717 DH66 = 067503 DT144 = 074984 DT3S U7 3156 EEERS 035314 

| OH 065791 DH6? = 066201 1145 = 074326 DT34 073224 FEERG 035352 
Owed, 066411 DH? = 066201 DT146 = 074336 DT35. = 072544 EEO 035420 
DH200 = 067503 DH70 = 066201 DT14? = 074254 D136 = 073244 EP] 035432 
DH901 = 067503 DH71 = 067031 DT1S. = 072434 DT3? = 073344 EEP2 035442 
OH202 = 067505 DH72 = 067073 DT150 = 074254 DTZ = 072360 EPS 035459 
OH203 = 067505 DH7$. = 067503 DT181 = 074326 DT40 = 073166 FEPG 035469 
DH204 = 067503 DH74 = 066201 DT152 = 074254 D141: 073316 EERRO 006450 
D205 = 066521 DH75. = 066201 DT153 = 074326 D142 «073350 EERR] 006466 
OH206 = 3 DH76 = 067031 DT154 074346 D143 = 073350 EERR2 006502 
DH907 = 067503 7? = 067073 DT185 = 074346 DT44 «073426 EET 034713 
O21 = 066201 DISPLA 001142 D156 = 074254 D145 «073476 FEI0 «035149 
DH210 = 067505 ISPRE 000174 Dr15? = 074254 D146 ~—«073552 FEI] «035189 
DART 971171 DPAT3, 017500 Di16. 072576 D147? «073640 FEI2 «035160 
DH212 = 066201 DSWR = 177570 DT160 = 074254 TE —-073402 EIS «035176 
DH21S = 066201 DT? «0723114 DT161 = 074984 DTSO = 073244 FE? 034746 
DHE14 = 067503 DT10 = 079434 DT162 = 074254 D151 «073672 EES «034770 
DHee 6647 DT100 = 073750 DT163 = 074254 DTS2 = 073640 EEG «035010 
DH 066534 DT101 = 074026 DT164 = 072360 D183 «073730 EES: 935020 
pHs 066672 p1102 = 074026 DT165 = 072360 DTS4 «073750 FES «35096 
DHDS 039 DT103, = 074026 DT166 = 074254 DISS = 073640 EE? «85044 
DH26 7073 DT104° = 073750 DT167 = 074954 DTS6 = 073730 FEB «035100 
DH2? = 067073 DT105 = 074026 DTI? = 072360 DT8? = 073750 EES —s« 035122 
DH 014 DT106 = 074074 DT170 = 074254 DT6. «72434 EMTVEC= 000030 
DH30 = 00000 D1107 = 074096 DT171 = 074254 DT60 = 073730 EMT. 045352 
DH31 = 0670 DTI} = 072434 DT172 = 074254 D161 = 073750 EM10 = 045569 
OHS = 06707 DT110 = 073750 DT173 = 074954 D162 = 073750 EM100 054462 
DH 67161 DT111 074114 DT174 = 076254 D163. = 073750 EM101 054529 
DH34 = 067161 DT112 = 074114 DTI75 = 074254 D164 «074006 EM102 054646 
DH3S. = 067161 DT113 = 074114 DT176 = 074254 DT65. = 074006 EM10$ 054720 
DHSS = 06716) DT114 = 074114 DT177 074360 D166 = 073750 EM104 055023 
DH3? = 067161 DT115 = 074114 DT2,. «(072336 D167 = 072640 EM105 055064 
DHa $105 DT116 = 074114 DT90.«—«0736 16 DT? = 079434 EM106 055211 
DH4O = 067161 DT117 = 072360 DT900 = 074254 DT70 074026 EM10? 055964 
DHG) = DT12. «073456 DT901 = 074954 DT71 = 074096 EM11. 045701 
OHA 2 ? D1120 = 072360 DT202 = 074254 DT72 «074074 EM110 055370 
DHSS = 067 DT191 = 073640 DT903 = 074954 D173. = 073750 EM111 055432 
DH44 DT192 = 073244 DT904 = 074954 DT74 = 072640 EM112 = 05543) 
DH4S DT19% = 073672 DT905 = 072360 DT7S. = 074026 EMI1S 095554 
nH DT194 (074126 DT906 = 074254 DT76 = 074096 EM114 = 055534 
HG? = DT195 = 074136 DT907 = 076954 DT7? = 074094 EMI1S = 095450 
DHS D116 = 074114 DT91. 072640 D1 006152 EM116 = 055536 
DHS0 D112? = 076114 DT910 = 074254 D10.«=—s«(006354 EM11? 055636 
DHS) = DTI. 072544 DT911 «074870 D2 006176 M12 = 000000 

| DHS2 = DT130 = 072360 DT912 (074406 D3 006200 EM120 (055772 
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EM152 05735 ine 07063 ERT2 042360 oO Raaase GPATI2 015152 
Em133 = 0376) mos = 907003 ERTS = 042364 44 ee Ss: GPAT13. 015154 
M134 057451 oar * prone ERTS 042374 FZ 035650 GRESET 014346 
Em135 057510 case |” Geoten ERTS 042406 FPSMS 04305 ote kaa 
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EMIS? = 057612 EMO? = 047943 E2 006422 FPVECT= 000244 GS1_ 014320 
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EM144 057641 oe R FDATI3 010360 FXDATS 010430 ele = Siseas 
EM145 = 057606 Re oe 7k FDATI4 010362 FXDAT6 § 010432 O14 015634 
EM146 = 057641 of bo FDATIS 030364 FXDAT7 010434 ar 015726 
EM147 057674 O25 959 FDATI6 010366 FI 006536 G16 012760 
EMIS _ 046105 065520 FDATI? 010370 F10 = 006760 G17,s«019762 
BMI 20 = 037676 050100 FDATOO 010374 FIl = 006762 G2 012230 
EM151 = FTA Thy 50251 FDATO! 010376 F12 007000 620 013084 
EMI3¢ _ 057726 03080 FDATO2 010400 F13, 007032 Geo 13058 
EM15% = 057796 Benz o8 FDATOS 010402 F135 007012 Gel 913106 
EM154 go 708 030580 FDATO4 010404 F14 007042 o¢¢ 013202 
EMI55 06001 = 050550 FDATOS 010406 20 Rees G24 013934 
EM156 06 * 080813 FDATO6 010410 F16 007062 Sse OB aS 
Em157 0 050671 FDATO? 010412 E17 007072 Gs5 (Ot ga 
EM16 046 43 FDONE 010436 F2 0065 G27 «013362 
EM160 061101 051007 FECMS 043123 F20 007102 G¢ 01223? 

EM161 13 FERRO 007144 FT 007112 i 
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EMI6S 061672 0315530 FERR2 007300 F4 G34 0136 
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EMIG7 062047 032046 FERR2? 010154 F6 006710 G3o 13636 
M17? 046301 Sen FERRDS 010204 F? 006740 G36 013640 
EM170 2 06 ESE: FERR26 010303 ee, eee G4 «12324 
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EM17 65 $5353 FERR4 007332 GAND1 01516 re 013766 
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0159759 I©aTts 011256 BuF3 017460 MDATOO 020350 MS44 045 
216030 1Par20 011260 KDATIO 017442 MDATO? 020352 mss 044161 
51£ 760 [Par2! 011262 KDATI1 017444 MDATO2 020354 mS 044223 
81995 [PAT 22 atic KDATI2 017446 MDATOS 020356 MS 044¢41 
$77 [PAT-3 011266 KDATI3 017450 MD 020360 wt 020034 
01605 17 010450 KDATOO 017462 MERRO 020204 M15 020954 
216000 110 010632 KDATO? 017464 MERR1 020242 020060 
07 1105 010640 KDATO2 017466 MERR 020156 ™ 020062 
Hod 1106 010634 KDATOS 017470 MERR 020270 02 
01 $76 111 010642 KDONE 017502 MNUMBE= 000214 m5 020120 
015 Lie 910650 KERRO 017324 MNUMO =. 044535 “6 020124 
0156 11 010664 KERR1 017370 MNUM1 044543 M7 020 
015656 114 010726 KERR2 0174146 MNUM2 044550 M8 020144 
015666 115 010730 KPATO 017472 MNUMS 044555 MS 020154 
616070 116 010732 KPAT1 017674 MNUM4 044564 NDATIO 021056 
616100 117 010750 KPAT2 017676 044572 NDATI1 021060 
016110 l2 010466 K1 017216 MPAT10 020330 NDATI2 021062 
gee 120 011010 K10 017344 MPAT11 020332 NDATI3 021064 
016150 121 011024 Kz 017242 MPAT12 020334 NDATOO 021014 
919169 I¢¢ 011030 K3 017244 MPAT13 020336 NDATO? 021016 
01571 le 0110464 K4 017246 MPAT20 020340 NDATO2 021020 
015746 13 010534 K5 017302 MPAT21 020342 NDATOS 021022 
015560 14 010536 K6 017310 MPAT22 020344 ND 021066 
000011 15 010540 K7 017322 MPAT23 020346 NERRO 020556 
015222 16 010564 LDATIO 020006 MS1 044101 NERR1 020656 
0154646 17 0106060 LDATI1 020010 MS10 44255 NERR10 020610 
015516 JBUFO 917144 LDATI2 020012 MS1 044270 NERR11 020622 
015550 JBUF1 017146 LDATI3 020014 MS12 044315 NEP 020712 
BT 2808 JBUF 617150 LDATOO 020020 MS13 044353 NERR2O 02 
01525 JBUF 017152 LDATO1 020022 MS14 044370 NER 020722 
015524 JDATIO 017154 LDATO2 020024 MS15 044456 NERRG 920732 
015346 JDATI1 017156 LDATOS 020026 MS16 44503 NERRS 020742 
O1 3288 JDATI2 017160 L 020030 MS17 044510 NERR6 020766 
015432 JDATIS 017162 LD1 043567 MS2 044113 1 043141 
037144 JDATOO 017164 2 043617 MS20 044600 NOOP10 043417 
AEE JDATO 017174 LERR1 017642 MS21 044641 NOOP11 043510 
011302 JDATO1 (17166 LERR2 017714 MS22 044700 NOOP15 043170 
011304 JDATO2 017170 LERRS 017666 MS23 044730 NOOP Oe aee 
O11 398 JDATOS 017172 LF = 000012 MS24 044757 NOOP 043302 
011270 JDAT1 017176 LFIEX1 042745 MS25 045052 NOOP4 045314 
011272 JDAT2 017200 LFIEX2 043015 MS26 045074 NOOP5 043331 
011274 JDAT3 017202 LFPS1 043554 MS27 045111 NOOP6 0433557 
011276 JD 017204 LOGP 004456 MS3 044120 NOOP7 0433577 
011310 JERRO 017024 LPAT10 017764 MS30 045120 NPAT10 021046 
SE JERR1 017072 LPAT11 017766 MS31 045127 NPAT11 021050 
tas JERR2 017116 LPAT12 017770 MS32 045136 NPAT12 021052 
01115 J1 016716 LPAT13 017772 MS33 045145 NPAT15 021054 
011174 J10 017044 LPAT20 017774 MS34 045154 NPAT20 0 HS 
011224 J2 016742 LPAT21 017776 MS35 045163 NPAT21 0210356 
011200 J3 016744 LPAT22 020000 MS 36 045170 NPAT ; Sabo 
044033 J4 016746 LPAT23 020002 MS37 045177 NPAT25 02104 
043 44 J5 017002 L1 017514 MS4 044147 NULL 04273 
043772 J6 017010 L2 017554 MS40 045215 N1 020 
0000 J7 017022 L3 017556 $41 045251 N10 020516 
011250 KBUFO 017452 L4 017560 MS415 045231 N11 020526 
011252 KBUF1 017454 L5 017630 MS4 tte N1 0205 
011254 KBUF2 017456 L6 017636 MS4 045313 N1 020544 
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SERR6 016536 tas OODTS 
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24 TRATI 
N 220412 PERRD 021714 Seani> §55¢63 SETI1 = 043713 TDATI2 012122 
NS 350032 PERRI = 062136 QERRIS. 099460 SETLI = 063721 TDATI 018194 
N5 5 PERRI0 021736 shania 022676 SPACE 042742 TDATOO 0121 
Ns 02044 PERR11 02176 QERRIS 099514 SPATIO 016664 TDATO! 012110 
N? y ; PERRI2 021762 QERRI5 022514 SPAT11 016666 reare, fisies 
NB 02047 PERRIS 022 OERRI? 099532 SPATIE 016620 TDATOS 012114 
Nd 0 Os PERR14 022016 QERR1 022614 SPAT13 016672 TDONE 012126 
ODATIO 02136 PERR15 022034 OERR2 022614 STACK = 001100 TERRO 011674 
ODATIT 021506 PERR16 022044 SERA? 099870 START 003616 TERRI 011956 
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ECwS 22 022722 - TPAT1 
OERR11 021326 PIRO’ = 179775 QPAT 55754 SwO2 = 000004 TPAT20 019076 
OERn 051570 PIRQVE= 000240 _ 022252 Sw03 = 000010 TPAT21 012100 
OERRO 027 370 042672 + 022410 sw04 = 000020 PAT22 012102 
OERRS 021426 PPATIO 022216 02 099074 Su0S = 000040 PATS? 012104 
OERRS 0214 PPAT11 022220 ee org 59976 $Ww06 = 000100 TPVEC = 000064 
OERRS 021446 PPATI2 022222 o4 (999300 SwO7 = 000200 TRAPVE= 060084 
OERR6 021472 PPAT13. 022224 ° 655322 SwO8 = 000400 TRTIVEC= 000014 
OPAT11 021554 PRO = 000000 Q6 SSE Swi = 000002 TST10 011312 
OPATI2 021556 PR1 = 000040 4 055366 SW10 = 002000 18111012130 
OPATI3 021560 PR2 = 000100 08 O55z65 SW11 = 004000 T8T12-015272 
OPAT20 0215 PR3 = 000140 nan 160410 SWi2 = 010000 1ST13 016142 
OPAT21 021540 PR4 = 000200 = lS red SW13 = 020000 TST1a 016706 
OPAT2 O61 34¢ PRS = 000240 RESREG= 10 6 sw14 = 040000 TIS 017204 
021544 ; RESVEC= 00001 = 100000 TS 
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By 31989 Psu = 177776 SADR 016660 sw == 000020 $190 020862 
1} Os! 3 PWRVE C= o900¢" SAVREG= 104611 — * 090100 1139 At Th 
1 = 000004 - 0 TST 
O13 081250 P2 «081620 SCGPE = 000004 Su? = 00020 rstee = Belare 
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05 03 140 p? 021700 DONE Siete $11 016346 aie Oe 2386 
06 021150 PR 021710 SERRO 4 e354 $12 016356 TST30 026132 
OF = 81160 QDATIO 022736 SERRIO 916404 $2 016204 TST31 026440 
08 091206 QDATII 022740 SERRIS 016464 S$ (016206 TST32 027506 
09 ¢1 QDATI2 022742 SERR15 16524 S4 016212 TST 5 031324 
PDATIO 022026 74,4 SERR2 0 $5 016236 3660 
PDATI] 099980 QDATOO 099726 SERRS, 016550 36 016246 ST 3% os4ri0 
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™S™37 QO UPAT4O 0240646 MERR2 025426 Y2 025600 SCRLF 001313 
TSTS% B08 193 UPAT41 026066 MERRS 025372 ¥3 952090 SDBLK 0404614 
7575 906 JPAT42 026070 MERR4 025442 v4 025642 $D9wWO 001402 
rs’ UPATS3 026072 XPATOO 025470 v5 O52 006 SDDW1 001404 
TST 010464 4102 XPATO1 025472 v6 025704 ¢PDw10 bbe 
TYPOS = 10440 4104 KPATO2 025474 Y7 352760 $DDW11 001430 
TYPE = 104401 24106 XPATO3 025476 ZDATOO 026376 $DDW12 001432 
TYPOC = 106402 UTMP 1 024076 XPAT10 025500 ZDATO1 026400 $DDW1 001434 
TYPON = 104404 UTMP2 026100 XPAT12 025504 ZDATO2 026402 SDDW14 001436 
TYPOS = 104403 ud 22766 XPAT13 025506 ZDATO3 026404 $DDW15 001440 
T1 011314 ul 023016 XPAT20 025510 Z7DON 026436 $DDW 001406 
710 He 7 U10 023374 XPAT21 025512 ZERR1 026302 $DDW 007410 
7105 0114 u11 23376 MPAT22 025514 ZERR2 026344 001412 
111 011472 ule 023430 KXPAT23 025516 ZFLA 026370 SDDWS 001414 
11 011500 U1 023446 Xx TMP 025456 ZPATOO 026406 $DDWo 001416 
T1 011514 14 023500 x1 024710 ZPAT01 026410 $DDW7 001420 
714 011556 U15 023534 x10 025112 ZPATO2 026412 SDDWB 001422 
715 011560 U16 023536 x11 025126 ZPATO3 026414 $DDW9 001424 
16 011562 U2 023066 x12 025166 ZPAT10 026416 SDEVCT 001326 
1 011 u3 023120 x13 025212 ZPAT11 026420 $DE 001374 
011340 U4 023170 X14 025220 ZPAT12 026422 SD9AGN 056442 
0 011640 U5 023222 x15 025234 ZPAT13 026424 SDTBL 040604 
1 011654 U6 Ne ee ee X16 025274 ZPAT20 026426 SENDAD (36432 
¢ 011656 023324 x17 025320 ZPAT21 02643 SENDCT 036124 
011670 WDAPOO 024674 x2 024750 Z°AT22 026432 t 036506 
011406 WDATO1 024676 x20 025326 ZPAT23 026434 SEN\’ 001336 
4 011410 WDATO2 024700 X21 025342 ZT™MP1 026372 SENVM 001337 
5 011412 WDAT 024702 x3 024774 ZTMP2 026374 036060 
g 011436 024704 X4 025002 71 026154 SEOPCT 036112 
011452 WPATOO 024664 x5 025020 Z2 026202 SERFLG 001103 
UDONE 024110 WPATO1 0264666 x6 025060 73 026226 001115 
VERRO 023554 WPATO2 024670 x7 025104 74 026234 037146 
VERR1 023600 WPATO3 024672 YDATOO 026070 75 026246 SERRPC 001116 
UERRIO 0 WSETUP 024632 YDATO1 026072 76 026300 SERRTB 001442 
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UERRS 0 ress W14 024456 YERRS 026034 SAUTOB 001134 SFFLG 041070 
UFLA 024074 w15 024504 YFLAG 026060 001372 SFILLC 001156 
UPAT oge0 4 W16 024544 YPATOO 026100 $BD 001122 SFILLS 001155 
UPATO1 024026 W17 024570 YPATO1 026102 S$BDDAT 091126 eGDADR 001125 
UPATO 5 4030 2 024146 YPATO2 026104 $BELL 001306 SGDDAT 001124 
UPATO 4032 w20 024604 YPATO3 026106 $CDW1 001376 SGET42 036404 
UPATIO 024034 W 024172 YPAT10 026110 $CDW2 00140C 041142 
UPAT11 40 W4 024210 YPAT11 026112 S$CHARC 040140 HD = 000003 
metle iz w5 024240 YPAT12 eeeite SCKSWR 041072 SHIBTS 003602 
UPAT13 024042 024300 YPAT13 026116 SCLR.T 036422 SICNT 001104 
| UPAT20 p 4044 7 024324 YPAT20 026120 SCMTAG 001100 SILLUP preove 
| UPAT21 4046 XAPT11 025502 YPAT21 026122 S$CM1 = 000024 SINTAG 00113 
UPAT ¢ 024050 XDATOO 025460 YPAT22 ogo lcs $CM2 = 000050 SITE 001114 
| UPAT 024052 XDATO1 025462 YPAT23 026126 S$CMS = 000024 $Lr 001314 
_ UPAT 4054 XDATO2 025464 YTMP1 026062 $CM4 = 000024 SLFLG 041067 
| UPAT31 4056 XDATO3 025466 YTMP2 026064 SCNTLG 041511 $L 036500 
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SYMBOL 
00: 1324 SREG3 001170 $TKS 001144 TRAP 041540 
1 036514 SREGS 001172 STMPO 001232 S$TRAP2 041562 
1 003610 SREGS 001174 STMP1 001234 RP = C0001 
’ 041 SREG6 001176 STMP10 001252 STRPAD 041574 
1 041624 SREG7 601200 STMP11 001254 €™STM 003606 
1 041760 SRESRE 03754 STMP12 061256 STSTNM 001102 
1 041676 SRINAD 036502 STMP13 001260 S$TYPDS 040400 
901 $ 001312 SRIRN 03647 STMP14 001262 TYPE 0376u3 
1 SRDCHR 041354 SSAVRE 037504 STMP15 001264 $TYPEC 040012 
00 $RDSZ = 000001 SSAVR6 042006 STMP16 001266 STYPEX 040142 
1 SREGAD 001160 SSCOPE 036516 $TMP17 001270 S$TYPOC 040170 
041 SREGO 001162 SSETUP= 000137 STMP2 001236 STYPON 040204 
601332 SREG1 001164 $STUP = 177777 $TMP20 001272 STYPOS 040144 
1 $REG1O 001202 $SVLAD 037070 STMP21 001274 SUNIT 001330 
1316 $REG11 001204 $SVPC = 003602 STMP22 001276 SUNITM 003612 
1 16 $REGI¢ 001206 $SWR = 177400 $TMP23 001300 $US 001342 
| 1 SREG13 001210 SSWREG 001340 $T 001240 SVECT1 001366 
| 001 53 $REGI4 001212 SSWRMK= 000000 STMP4 001242 S$VECT2 001370 
| 135 $REGIS 001214 $SWRMS= 09200 STMPS 001244 SXOFF = 000023 
| 901 3 $REG16 001216 $ 042740 STMP6 001246 $XON = 000021 
7140 S$REG17 001220 S$TBIT 036504 S$TMP7 001250 $XTSTR 036642 
1154 SREG2 001166 STERM = 000030 $™N = 000037 $$GET4= 000007 
1 $REG20 001222 STESTN 001322 $T 01152 SOFILL 040375 
040374 SREG21 001224 H 043134 STPFLG 001157 -RSET 042622 
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SEQUENCE 195 
SYMBOL CROSS REFERENCE CREF 01 
SYMBOL VALUE eens 


ag + 39-3987 40-4089 40-4092 41-4229 41-4232 42-4341 43-4473 


5 
#68-6457 70-64 

CPT WO 0426046 25-1859 25-1913 #69-6466 70-6489 

CR = 000015 419-1783 59-6277 59-6277 

CRLF = 000200 #19~-1782 #19-1783 4-1812 24-1812 24-1813 24-1814 33-3325 33-3325 56-6271 
rm 14. 56-6271 6-6271 59-6277 59-6277 71-6496 71-6496 71-6500 71-6501 
71-650 71-6503 71-6505 71-6507 71-6509 71-6510 71-6512 71-6514 71-6515 
71-65 71-6561 71-6562 71-6563 71-6564 71-6565 71-6566 72-6590 72-6593 
72-6596 72-6597 72-6601 72-6604 72-6611 72-6612 72-6617 72-6620 72-662 
72-6625 72-6627 72-6629 72-6631 72-6637 72-6638 72-6660 -606 ~ 

~6663 72- 72-6663 72-6665 72-6665 72-6665 - : 


72-6838 72-6840 72-6841 72-6842 72-6843 72-6844 72-6848 73-6853 73- 
73-6884 73-6921 73-6944 73-6946 73-6946 73-6951 73-6951 73-6952 73-6968 


73-6984 

C1 005174 27-1992  #27-1994 

C15 005222 57=1999  #27-2001 

C 005246 27-2009 #272010 

C25 005262 27-2013 #27-2014 

¢ 005310 27-2022 #27-2023 

C35 005340 27-2028  #27-2029 

C4 005 27-2037 #27-2038 

C45 005400 27-2040  #27-2042 

C5 005426 27-2050  #27-2051 

55 005454 27-2056 #27-2058 

C6 005500 27-2066 #272067 

C65 005514 27=2069  #27-2071 

Cc 005542 27-2079  #27-2080 

C75 00557 27-2084 #27-2086 

C8 005620 27-2094 #27-2095 

C85 0056 2 27-2097  #27-2099 

DDDATO =: 034556 52-5907 52-5913 52-5936 52-5958 52-5980 52-5986 52-6008 52-6014 52-6036 
52-6042 52-6065 52-6071 52-6089 52-6090 52-6091 52-6092 52-6093 52-6094 
52-6095 52-6096 52-6097 52-6098 52-6099 52-6100  #52-610 

DDDONE 034706 52-6084 52-6088 52-6089 52-6090 52-6091 52-6092 52-6093 52-6094 52-6995 
52-6096 52-6097 52-6098 52-6099 52-6100  #52-6112 

DDERO : 3770 52-5925 52-5947 Ss 52-5969 ~=—s-«42=5997 5 2~6025 =—s-« 52-6054 ~=«-« S$ 2=6083 #5 2-6 085 

DDER1 4006 32-5918 #52-6089 

DDER1 034424 52-6049  #52-6098 

ODER1 : 4462 52-6076 #52-6099 

DDERI2 5 52-6078  #52-6100 

DDERG 0 4044 52-5920  #52-6090 

ODER 4102 28-5940 #52-6091 

DDERS 0 140 52-5964 #52-6092 

DDERS 176 52-5991  #52-6093 

DDER6 034234 52-5993 52-6094 
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476-7126 


#74-7025 


PAGE 11 
QUENCE 198 
CREF v01 
74-7131 
74-7137 74-7142 74-7143 74-7146 74-7147 
74-7077 74-7082 
74-7160 74-7161 
74-7047 
74-7048 
74-7026 74-7037 74-7101 74-7102 74-7110 


74-7138 


74-7139 


CAFPAD CREATED BY MACRO W 20-OCT-81 AT 09:38 PAGE 12 
semen: id _ 


SYMBOL CROSS REFERENCE 01 
SYMBOL VALUE REFERENCES 

DF 71515 21-1802 474-7046 

DFS) = 071450 1=1802 476-7047 

DESg = 07167 1-1802  #74-7048 

DF 71531 21-1802  #74-7049 

OF 071557 21-1802 #74-7050 74-7051 74-7052 74-7053 
DF35 = (071387 21-1802 474-7051 
“OF = 071557 21-1802 #747052 
OF = 071557 21-1802 #74-7055 
DFG = 071256 21-1802 #74-7026 
FSO 071605 21-1802  #74-7054 

DF41 071631 21-1802  #74-7055 
DFS 071645 21-1802 #74-7056 74-7057 

DF4 = 071645 21-1802 #74-7057 

DF 44 071673 1-1802  #74-7058 

DF 45 071716 21-1802 #747059 

DF4 071743 21-1802  #74-7060 

DF4 071775 21-1802 74-7061 74-7064 74-7067 74-7103 
DFS 071266 21-1802 #74-7027 74-7028 += 74-7029» 74-7030 ~=—- 74-7031 
DF 50 072012 21-1802 #74-7062 74-7104 

DF 51 072036 21-1802 #74-7063 74-7105 

DF52. 0 = (071775 21-1802  #74-7064 

DFS 072054 21-1802 #74-7065 74-7068 74-7070 

DF 54 072063 21-1802 #74-7066 74-7069 74-7071 74-7672 74-7073 74-7076 74-7081 74-7086 

74-7090 74-7094 

DF55 = =: 071775 21-1802 #74-706 

DF56 «= =: 072054 21-1802  #74-7068 

DF57 —s_ =_:072063 21-1802  #74-7069 

D6 = O71 266 21-1802 #74-7028 74-7034 74-7035 

DF60 = =: 072.054 21-1802  #74-7070 

DF61 = 072063 21-1802  #74-7071 

Dr6e = (072065 21-1802  #74-7072 

DF63 = =: 072063 21-1802  #74-7073 

DF 64 072101 21-1802 #74-7074 74-7075 

DF65 = =:072101 21-1802  #74-7075 

DF66 «= =: 072063 21-1802  #74-7076 

DF67. ss =: 071367 21-1802  #74-7077 

DF = 071266 21-1802  #74-7029 

DF 70 072110 21-1802 #74-7078 74-7079 74-7083 74-7084 74-7087 74-7089' 74-7091 74-7093 
DF71 = =_: 072110 21-1802  #74-7079 

DF? 072132 21-1802 #74-7080 74-7085 74-7088 74-7092 
D3 = 07206 21-1802  #74-7081 

DF74 == (071367 21-1802  #74-7082 

DF75. = =_:072110 21-1802  #74-7083 

DF76 = =_:072110 21-1802  #74-7084 

D7? = O72 13¢ 21-1802  #74-7085 

DH1 065631 21-1802 #73-6855 

DH10 = =_: 066201 21-1802  #73-6866 

DH100 = 067503 21-1802  #73-6934 

DHIO1 = (066201 21-1802  #73-6935 

DHI0g = 067075 21-1802 #73-6936 

DH103 = = 067031 21-1802  #73-6937 
| 
| 
| 
EE i i a tn an cial 


F 16 
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NCE 200 
SYMBOL CROSS REFERENCE CREF vO01 
Sy VALUE REFERENCES 
= 067503 21-1802 #73-6938 
: i 1-1802  #73-6939 
= 067073 1-1802  #73-6940 
= 067031 1-1802  #73-6961 
= 066201 21-1802 #73 
= 067503 21-1802  #73-6942 
11) = 067051 21-1802  #73-6943 
HITE _ 067701 21-1802 #73-6944 73-6949 
0H113 = 067031 21-1802  #73-6948 
DH114 = 067701 21-1802  #73-6949 
0H115. =: 070120 21-1802 #73-6950 73-6954 
“DHITg = 070120 21-1802  #73-6954 
DH117 = (066321 21-1802  #73-6955 
DH1 - 21-1802  #73-6868 
DH1 070404 21-1802  #73-6956 73-6965 
DHIg} = 066201 21-1802  #73-6958 
DHI3@ = 067451 21-1802  #73-6959 
DH1 = 067431 21-1802  #73-6960 
DHI1g4 == 066521 21-1802  #73-6961 
DH125 = 066321 21-1802  #73-6962 
DH126 = 066201 21-1802  #73-6963 
DH = 067503 21-1802  #73-6964 
DH1 = 000000 21-1802  #73-6869 
DH130 = 070404 21-1802  #73-6965 
DH131 = 067503 21-1802  #73-6966 
DH13¢ = 067505 21-1802  #73-6967 
DH1 070474 21-1802 #73-6968 73-6970 73-6971 73-6972 73-6979 73-6980 
OH1 = 070474 21-1802  #73-6970 
DH135 == 070474 21-1802  #73-6971 
DH1 = 070474 21-1802  #73-6972 . 
D1 070604 21-1802 #73-6973 73-6976 73-6977 73-6978 73-6981 73-6982 
DH14 = 066201 21-1802  #73-6870 
DH140 = 070604 21-1802  #73-6976 
DH141 = 070604 21-1802  #73-6977 
DHI4g == 070604 21-1802  #73-6978 
DH143 = 070474 21-1802  #73-6979 
DH144 = 070474 21-1802  #73-6980 
DH145 = = 070604 21-1802 #73-6981 
DHI4G = 070604 21-1802  #73-6982 
DH147 = _ 067503 21-1802  #73-6983 
DHI5, = 066201 21-1802  #73-6871 
DH150 =s-—«070774 21-1802  #73-6984 
DH151 = 070604 21-1802  #73-6986 
DHIS¢ = 070674 21-1802  #73-6987 
DH153 == 070604 21-1802  #73-6988 
DH154 71065 21-1802  #73-6989 73-6990 
DH155 = 071065 21-1802  #73-6990 
DH156— = 0675 3 21-1802  #73-6991 
DH157 = :06750 21-1802  #73-699 
DH16 066241 21-1802  #73-6872 
DH160 = 067503 21-1802  #73-6993 
DH161 = 067503 21-1802  #73-699% 


A Tn ee . —- —--~ 


73-6987 


73-6986 


73-6988 


G 16 
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SEQUENCE 201 
SYMBOL C2OSS REFERENCE CREF v01 
SV v r¢3 REFERENCES 
= 503 1=1 473-6995 
= 067503 21-1802 #73-6996 
= 066321 1-1802 #£73-6997 
= +e 1 1-1802 #73-6998 
= 06 ; 21-1802 #£73-6 
: 566393 $4180 Hema, 73-6955 73-6961 73-6962 73-6997 73-6998 73-7014 
= 06 355 31-1805 #73-7001 
= 06750 21-1802 #73-700 
= 06750 21-1802 #73-700 
= 06750 51-1505 473-7004 
= 06750 1-1802 #73-700 
= eet 21-1802 #73-7006 
= 06750 21-1802 #73-7007 
O35? 21-1802 #73-7008 
065721 21-1802 #73-6857 
Rose! 21-1802 #73-687 
= 067503 21-1802 #73-7009 
+ eet 21-1802 #73-7010 
= 06750 21-1802 #73-7011 
= por eas 21-1802 #£73-7012 
= 06750 21-1802 #73-7013 
= 321 21-1802 #73-7014 
= 067503 21-180 #73-7015 
= 067503 21-1802 #73-7016 
= peeeR 21-1802 #73-6878 
= 067503 21-1802 #73-7017 
071171 21-1802 #73-7018 
= poe 21-1802 #73-7019 
= 01 21-1802 #73-7020 
= 067503 21-1802 #73-7021 
066477 21-1802 #73-6879 
066534 21-1802 #73-6880 
Bose ss 21-1802 #73-6883 
oerors §—«Bhciaye aracseee | HEcSSR2FEEEGG | TEEEBT TICES] SESE FECES rsa 
$3 6058 73-6936 73-6940 
067073 21-1802 #73-6888 
066014 21-1802 #73-6859 75-7190 75-7220 
= 9 21-1802 #73-6889 
= 06707 21-1802 #73-6890 
: th te 34-1805 493-0892 73-6894 73-6895 73-6896 73-6897 73-6898 
= 067161 21-1802 #73-6894 
= 067161 21-1802 #73-6895 
= 067161 21-1802 #73-6896 
= 067161 21-1802 #73-6897 
Bog t0> 21-1802 #73-6861 
= 067161 21-1802 #73-6893 
= B71 0000 21-1802 #73-6899 
64 21-1802 #73-6900 73-6902 
= 067264 21-1802 #73-6902 


Ey ee ee 


16 
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QUENCE 202 
SYMBOL CROSS REFERENCE CREF v01 
SYMBOL Vv 


REFERENCES 
21-180 a 


DH44 = ; 73-6903 

D445 06 21-180 #73-6904 73-6906 

DMG 067405 21-1802 #73-6905 

DH4 = 907 396 21-1802 #73-6906 

DH5 066201 1-1802 #73-6863 73-6864 73-6865 73-6866 73-6847 73-6870 73-6871 73-6878 
3-6910 73-6913 73-6925 73-6926 73-6930 73-6931 73-6935 73-6939 73-6958 
73-6963 73-7019 73-7020 

DH50 067431 21-1802 #£73-6907 73-6909 73-6959 73-6960 

DH51 = 067431 21-1802 #73-6909 

DH5 = ‘ 21-1802 #£73-6910 

DHS = 067073 21-1802 #73-6911 


«DHSS 067503 21-1802 #73-6912 73-6915 73-6917 73-6918 73-6919 73-6924 73-6929 73-6934 
| 73-6938 73-6942 73-6964 73-6966 73-6967 73-6983 73-6991 73-6992 73-6993 
73-6994 73-6995 73-6996 73-6999 73-7000 73-7001 73-7002 73-7003 73-7004 
73-7005 73-7006 73-7007 73-7009 73-7010 73-7011 73-7012 73-7013 73-7015 
73-7016 73-7017 73-7021 


H55 = 066201 21-1802 #73-6912 
Ho = 067075 1-1802  #73-6914 

H57 = _ 067503 21-1802  #73-6915 

H6 = =_: 066201 21-1802  #73-6864 

DH60 = =_:«067073 21-1802 #73-6916 ; 
DH6) = (067305 21-1802  #73-6917 

DH62 = = 06750 21-1802  #73-6918 

DH63 = = 067503 21-1802  #77-6919 

DHO4 067613 21-1802  #75-6922 

DH65 067544 21-1802  #73-6920 

DH6G == 067505 21-1802  #73-6924 
D = 066201 21-1802 #73-6925 

DH = 066201 21-1802  #73-6865 

DH70 = =_:(066201 21-1802 #73-6926 
DH71 = =:067031 21-1802  #73-6927 
DH72 = =_:(067073 21-1802 #736928 

DH73 = =_: 067503 21-1802  #73-6929 

DH74 = 066201 21-1802 #73-6930 

DH75. = -(066201 21-1802  #73-6931 
DH76 = = -(067031 21-1802  #73-6932 

DH77 ss =:067073 21-1802 #73-6933 

DISPLA 001142 #20-1795 *24-1811 *24-1811 56-6271 57-6273 
DISPRE 000174 #19-1794 24-1811 
DPAT3. 017500 437-3806 

DSwR = =_:177570 #19-1783 20-1795 24-1811 
DTT 072314 21-1802 #757165 

DT10, = 078454 21-1802 475-7175 

D1100 = 073750 21-1802 #75-7267 

DT101 = 074026 21-1802 475-7268 

DT10@ = 074026 21-1802  #75-7269 

DT103 = 074026 21-1802  #75-7270 

DT104 = 073750 21-1802 #757271 

DT105 = 074026 21-1802 #75-7272 

DT106 = 074074 21-1802 #75-7273 

DT107 = 074086 21-1802 #75-7274 

DT11 «= =_:(072434 21-1802 #757176 
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eVv9s9sCV999T0T900000090 090900 


S REFERENCES 
= - -727 
Bria B701%8 33-1805 are 55 96 75-7277 75-7278 75-7279 75-7280 75-7281 75-7291 75-7292 
111 = 074114 1-1802 #75-7277 
48 s orarie 1-1802 #75-7278 
7114 = 0741146 21-1802 #£75-7279 
7118 = 076114 1-1802 #75-7280 
711 = 0746114 21-1802 #75-7281 
Wie - 1-1802 #75-7282 
T1 072656 21-1802 #75-7177 
T1120 = 21-1802 #75-7283 
T1121 = 21-1802 75-7284 
T1 = 073244 21-1802 #75-7285 
T1 ¢ = 073672 21-1802 #75-7286 
71246 074126 21-1802 #75-7287 75-7290 
T125. _ = 074126 21-1802 #75-7290 
T1126) = 074114 21-1802 #75-7291 
1127s = 07411 21-1802 #75-7292 
T1 072544 21-1802 #75-7181 
T7130 = =—:~( 072360 21-1802 #75-7293 
1132 = 974515 $1-1803  apsap996 
11 z ~ - . 
~ - 75-730 75-7301 75-7302 75-7307 75-7308 75-7311 75-7312 
38 — ooopete fish 14 e300 75-7320 75-7321 75-7322 75-7323 75-7326 ?5~7327 
75-7328 75-7329 75-7330 75-7331 75-7332 75-7333 75-7334 75-7336 75-7337 
75-7338 13-7 75-7340 75-7342 75-7343 75-7344 75-7348 
T = 074254 21-1802 #75-7 | 
BE = OF 05ee as 3 Abe Ht 
ora : a7433¢ 31-1805 it gh 75-7304 75-7305 75-7306 75-7309 75-7310 75-7313 75-7315 
= 4 21-1802 #75- 
br 120 = O5e8 6 21-1802 #75-7304 
DT141 = 074326 21-1802 #75-7305 
DT14 = 074326 21-1802 #75-7306 
ores = 074254 21-1802 #75-7307 
DT144 == 074254 21-1802 #75-7308 
DT145 = 074326 21-1802 #75-7309 
DT14 = 074326 21-1802 #75-7310 
Bre? = 074254 21-1802 #75-7311 
DT15 = 072434 21-1802 #75-7184 
DT150 = = 074254 21-1802 #75-7312 
DT151 = 074326 21-1802 #75-7313 
DT15 = 074254 21-1802 75-7314 
ore = 074326 21-1802 #75-7315 
DT154 074346 21-1802 #75-7316 75-7317 
DT155 = 074346 21-1802 #75-7317 
DT15 = 074254 21-1802 #75-7318 
ores = 074254 21-1802 #75-7319 
DT16 072576 21-1802 #75-7185 
DT160 = 074254 21-1802 #75-7320 
Drie? = Op4aee $1n1809 #980352 
DT1 = - 
ores = 074254 21-1802 #75-7323 
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D146 552 21-1 
D147 07 21-1802 
DTS 072402 21-180 
D150 = 073264 21-180 
D151 073672 21-1802 
D152 =: 073640 21-1802 
or§ 073730 21-180 
D154 073750 _ 21-1802 
75-7271 
TSS 073640 21-1802 
D156 = 073730 1-1802 
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DT 072454 21-1802 
D160 «= =_:(0737 21-1802 
D161 = 073750 21-1802 
D162 «= =_:073750 21-1802 
D163 «= =_: 073750 21-1802 
DT64 074006 21-1802 
0165 = = (074 21-1802 
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SYMBOL CROSS REFERENCE v01 
Sy vAL UE REFERENCES 

Em) 51 1=1802 472-6805 72-6809 
EM 5754 1-1 #72~6806 72-6810 
EmM137 = Or ese5 21-1802 #72-6807 

EM14 04576 21-1802  #72-6588 

EMI<O = 087451 21-1802  #72-6808 

EM141 = 057510 21-1802 #72- 
EM142— = 057547 21-1802  #72-6810 

EM14 057606 21-1802 #72-6811 72-6813 
EM144 057641 21-1802 #72-6812 72-6814 
EM145 == 057606 21-1802  #72-6813 
EM146 = 057641 21-1802  #72~6814 
EM14 057674 21-1802 #726815 72-6816 72-6817 
EM15 046105 21-1802  #72-6591 

EM150 = 057674 21-1802  #72-6816 
€m151 = 057674 21-1802  #72-6817 | 
EM15 057726 21-1802 #72-6818 72-6819 
EMI53 = 057726 21-1802  #72-6819 

EM154 = 0577 21-1802  #72-682 

EM155 21 21-1802  #72~6821 

EM156 ©=—- (06044 21-1802 #726822 

EMI57 060662 21-1802 472-6823 

EM16 046 21-1802 #726594 

EM160 061101 21-1802 #72-6824 

EM61 061306 21-1802 #72-6825 

EM16 06151 21-1802  #72-682 

EM16 061560 21-1802 #726827 

EM164 061625 21-1802 #726828 

EM165 061672 21-1802 #726829 

MI66 061737 21-1802  #72-6830 

EM16 062047 21-1802 #726831 

EM17 046301 21-1802 #72~6595 

EM70 062506 21-1802 #726832 

EM171 062416 21-1802 472-6833 

EM17 062655 21-1802 #72-6834 

EM17 063114 21-1802  #72-6835 

EM174 063353 21-1802 #726836 

EM175 «(063612 21-1802 #72-6837 

EM17 064051 21-1802  #72-6838 

EM17 064206 21-1802 #726839 

E 045407 21-1802  #72~6578 

EM20 046534 21-1802 #72-6599 

EMZ00 064242 21-1802  #72-6840 

EM201 064377 21-1802 #72~6841 

ENZ0g 0643.34 21-1802 #72-6842 

EMZO 064671 21-1802 #72~6843 

EM204 065026 21-1802  #72-6844 

EM205 (065163 21-1802  #72~6845 

EM206 065230 21-1802  #72-6846 

ENZO 065275 21-1802 #72-6847 

EM21 046712 21-1802  #72-6603 

EMZI0 «06941 21-1802 #72-6849 

EM211 = 045560 21-1802  #72-6850 
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30-2483 30-2505 
30-2592 30-2611 
31-2840 31-$878 
35~3559 35-3565 
36-3687 37-3769 
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41-4252 41-4264 
43-4522 43-4529 
45-4829 45-4837 
46-5043 47-5119 
49-5379 49-5387 
50-5625 50-5631 
51-5869 52-6087 
52-6096 52-609 
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24-1811 *24-1811 
*35=3474 *35-3504 
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#66-6418 
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33-3322 
33-3296 


33-3185 


5 
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*33-3183 
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64-6287 


33-3188 


33-3189 


#33-3350 
33-3315 


33-3186 


33-3186 
33-3227 


33-3190 


33-3191 
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33-3187 


33-3187 
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*33-3184 
33-3 

*33-3193 
55-6269 


_ 
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«33-3189 
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55-6269 
64-6287 
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33-3189 


33-3189 
#33-3346 


*33-3185 
33-3190 
#33-3328 


55-6269 
64-6287 
64-6287 


#33-3330 


#33-3534 
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33-3190 


33-3186 
«33-3190 


55-6269 
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CREATED BY MACRO ON 20-OCT-81 AT 3 PAGE ¢6 
SYMBOL CROSS REFERENCE v01 
MBOL VALUE 


EQUENCE 21 
CREF 





SY At REFERENCES 

HAGW 1 “$374 34-3384 #34-3439 

HASR 01 “$400 34-3446 

HASW 016010 “3373 34-3383 #34-3440 

HCLR 13674 34-3368 34-3599 #34-3415 

HCLRI1 3=—s-s«Q15 W36-3417 34-3418 

HCMP 0156 -3379 -338] «34-3382 «34-3383 «34-3384 34-3385 34-3404 
HCMP1 015656 #34-3408 3411 

HOMP2 015666 ~3409  #34-3411 

HAT! 916070 4-3363 34-3448 

HDAT 16100 434-3449 

HDAT 016110 #34-3450 

HATS 016120 #34~3451 

HDATS 016130 #34-3452 

016140 34-3389 34-3430 434-3453 

HER 015712 3410 #34-3422 
HFLAG 015746 £34-3361 34-3387 *34-3391 —-# 34-3434 

HSTD 015560 -3377 34-3381 «34-3382 4-34-3383 «34-3384 34-3385 © # 34-3395 
HT = 000011 #19-1783 59-6277 59-6277 
H1 015222 -3359 -#34-3361 
H10 015464 34-3384 3384 
H11 015516 #34-3385 -3385 
H12 015550 34-3588 34-3591 
H2 015242 #34-3365 34-3366 
H3 01525 #34-3370 34-3392 
Hd 015324 434-3377 
H5 015346 434-3381 34-3381 
H6 015400 #34-3382 34-3382 

7 015432 34-3383 34-338 

IBSAVE 037144 #57-6273 *57-6273 «57-6273. «57-6273. «57-6273 «= 557-6273 «= 57-6273 
IDATIO 011300 1-2710 31-2716 «31-2734 «= 31-2760 «= 31-2765 = 31-2794 += 31-2830» #31-2871 
IDATI? 011302 #31-2872 

IDATI2. 011304 #31-2791  #31-2873 

IDATIS. 011306 £31-2792  #31-2874 

IDATOO 011270 1-2730 31-2733. «31-2788 «= 31-2793 «= 31-2831: #31-2866 
IDATO! 011272 #31-2867 

IDATO2 =: 011274 31-2739 31-2744 31-2799 #31-2868 

IDATOS 011276 31-2802  #31-2869 

I 011310 31-2808 31-2826 31-2833 31-2841 31-2853 #31-2876 
IERRO 911050 31-2723 #31-2811 

IERR1 011132 31-2748 31-2801 #31-2829 

IERR2 —s- 011152 31-2752  #31-2836 

HERES §— 011174 #31-2839 31-284 

IERR 011224 31-2782  #31-2848 

HERR 911200 31-2804 #31-2842 

ILLMS 04403 #71-6530 75-7195 

ILL1 043727 #71-6527 

LL2 043772 #71-6529 

IOTVEC = 000020 #19-1783 *24-1811*24-1811 

PATIO 011250 31-2711 31-2759 #31-2856 

IPAT11 011252 #31-2857 

IPATI2, 011254 31-2799  #31-2858 

IPATI3. 011256 31-2802  #31-2859 
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rs ee a ee ee ee we ee _—— 
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CKFPAD 
SYMBOL CROSS REFERENCE 
Y vA 
eATgy 11260 
ATe1 011262 
ease 011264 
IPAT 011266 
11 010450 
110 010632 
1105 010640 
1106 010634 
111 pores 
it¢ 01065 
11 01 
114 010726 
115 0107 
116 010732 
117 010750 
I2 010466 
120 011010 
121 Ot 086 
¢ 011030 
I 011044 
I 010534 
14 010536 
15 010540 
16 010564 
17 010600 
JBUFO 017144 
JBUF 1 017146 
JBUF 2 017150 
JBUF 3 017152 
JDATIO 017154 
JDATI1 017156 
JDATI 017160 
JDATI 017162 
JDAT 017164 
DATO 017174 
JDATO1 017166 
JDATO 017170 
JDATO 017172 
DAT1 917176 
JDAT2 017200 
JDATS 017202 
017204 
JERRO 017024 
JERR 017072 
JERR2 017116 
J1 016716 
J10 017044 
J2 016742 
J3 016744 
J4 016746 
JS 017002 
J6 017070 
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R A a 
1-2719 


36-3649 


31-2768 


#31-2708 
#31-2751 
#31-2754 
#31-2752 


a ae 52: 


31-2751 
#36-3690 


36-3645 


36-3646 
#36-3705 


36-3672 


#36-3651 


#31-2861 


31-2849 


36-3653 


36-3686 


36-3679 
#36-3674 


436-3667 
36-3684 
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CREF V 


36-3677 


#36-3700 


36-3688 


01 


36-3685 


#36-3711 


#36-3695 


ne ee ee eee 


CKF PAD 


SYMBOL CROSS REFERENCE 
SYMBOL V 
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SECUENCE LE 
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=~ 

Ane 


020012 


Siete RES 

he ~~ 

VW SA 
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oooooe 
tt ad a ed 
™~ 
™~ 
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REFERENCES 
-3654 # 


=3739 "39-3740 
#37-3794 
#37-3795 
#37~-3796 
37-3744 37-3775 
#37-3789 
#37-3790 
#37-3791 
73737 37-3745 
437-3799 
#37-3800 
#37-3801 
37-3756 37-3770 
37-3731  #37-376 
37-3742 37-3754 
37-3749  #37-378 
37-3726 #37-3803 
#37-3804 
#37-3805 
37-3721 #37-3723 
37-3761 37-3763 
#37-3733 © 37-3773 
#37-3734 37-376 
#37-3735 37-3762 
#37-3747 37-3750 
37-3748  #37-3750 
37-3753 #37-3756 
38-3826 38-3833 
#38-3899 
38-3846  *38-3850 
38-3851  #38-3901 
38-3843 38-3853 
38-3885  #38-3903 
#38-3904 
#38-3905 
-3861 38-3868 
#71-6517 
#71-6518 
~3 #38-3863 
38-3858  #38-3877 
#38-3870 38-3881 
#19-1782 59-6277 
#71-6500 75-7171 
#71-6501 = 75=7171 
#71~6516 
#24-1816 55-6269 
38-3823  #38-3889 
38-38 
#38-3891 
#38-3892 
38-3827 38-3877 


37-3752 


37-3783 


37-3784 


37-3777 


#37-3772 


#37-3766 
37-3782 


38-3852 
38-3866 
38-3873 


38-3875 


59-6277 
75-7173 
75-7173 


#38-3894 


re Ce 


PAGE 
v01 


#37-37953 


437-3788 


#37-3798 


37-3786 #37-3808 


38-3872 #38-3898 
438-3900 


38-3878 


38-3884 


#38-3902 


38-3887 #38-3907 


a ee a re ee 


—— ee ee ee 
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FERENCES 
o8895 
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#38-3896 
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#71-6561 


CREATED BY MACRO ON 20-OCT-81 AT on: 
gr REFERENCE 


9 
39-3944 


39-3966 
#39-3968 
39-3958 


#39-3985 
21-1799 


3 
#39-3996 


39-3981 


75-7198 


75-7240 


38-3871 


39-3954 


39-3976 
#39-3978 


#71-6547 
#71-5548 
#71-6549 
#71~-6550 
471-6551 
#71-6552 


#39-4001 


75-7211 


75-7237 


#71-6545 
75-7229 
75-7212 


75-7228 


75-7240 
75-7240 
75-7240 
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CREF V 


01 


38-3883 


39-3964 


39-3983 


75-7228 


75~7225 


75-7228 
75-7230 


-——- ae ee ee + 


39-3980 


39-3994 


75-7244 
75~7214 


75-7259 


75-7245 
75-7231 


#39-4006 

439-4011 
75-7215 75-7224 75-7225 75-7236 
75-7289 
75-7244 75-7245 


me ee 
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CREATED BY MACRO ON 20-OCT-81 AT 7:8 
SYMBOL CROSS REFERENCE 
SYMBOL V 
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UIAIRI RIAD) ed eed ed 2d 
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#71-6513 
#71-6515 


75-7299 


75-7201 
75-7201 
75-7259 


39-3962 
39-3968 


gett 
40-4129 
40-4054 
40-4098 


#40-4100 
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QUENCE 217 
CREF v01 
75-7199 75-7211 
75-7234 
75-7234 
75-7235 
75-7235 
75-7235 
#71-6567 
#71~-6568 
75-7294 
75-7199 75-7211 
75-7214 75-7224 
75-7202 75-7204 
75-7288 75-7289 
39-3974 39-3979 
39-3990 
40-4137 #40-4146 
40-4061 40-4071 
40-4106 40-4112 
40-4116 40-4118 
75-7181 
75-7181 


75-7212 


75-7212 


75-7258 


75-7214 


39-3991 


40-4128 


40-4124 


75-7288 
75-7215 75-7224 


#40-4133 


40-4131 #40-4151 


75-7225 
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a ogi REFERENCE 
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440-4141 


40-4040 


30-2632 
40-4066 


40-4085 
#40-4047 


75-7178 
75-7178 


40-4043 


#71-6497 


#40-4069 


40-4122 


41-4278 


41-4211 


41-4246 
#41~-4248 


41-4257 
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EQUENCE 218 
CREF V 


01 


40-4047 


40-4127 


441-4288 


41-4269 


41-4255 


41-4259 


40-4051 


#41-4274 


41-4265 


40-4062 


41-4272 


40-4090 


441-4293 


ee ee 


40-4121 


#40-4137 


ome ee 
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QUENCE 219 
oe a: REFERENCE CREF v01 


ALUE 
OPAT1 6215 #41-4286 
OPAT20 0215 41-4181 41-4262 #41-4278 
OPATS1 021340 41-41 41-6186 41-4188 = 41-4192 41-4202 41-4230 = #41-4279 
OPAT¢? 02134 #41=42 | 
OPAT23 021544 #41-4281 
OPAT24 02154 #41-4282 
01 02107 #41-4162 
010 021 #41-4204 41-4206 
011 021 41-4205  #41-4209 
01 021 41-4182  #41-4211 
01 021250 #414214 41-4216 
014 021260 41-4215  #41-4219 
08 021116 #41-4174 41-4251 41-4268 
0 021120 #414175 41-4227 
04 021122 #614176 41-4225 = 41-4263 
05 021140 #41-4184 
06 021150 41-4185  #41-4188 
07 021160 41-4189  #41-4192 
08 021174 #41-4196 41-419 
09 021206 41-4197 #41-4201 
PDATIO 022226 42=4311 42-4319 42-4324 42-4345 42-4349 = 42-4353 42-4357 = 42-4361 = 42-4379 
42-4385  #42-4403 
PDATI1 022230 #42-4404 
PDATIg —_0g23¢ #42-4405 
PDATI3 022234 #424406 
ATOO 928836 42-4316 42-4320 42=4329 42-4386 = #42~4408 
PDATO! 022240 #42-4409 
PDATO2 022242 #42-4410 
PDATOS 02244 #42~4411 
022246 42-4327 42-4371 42-4381 42-4388 «= 42-4396 © 42-4413 
PERRO 021714 42-4309  #42-4337 
PERR1 022134 42-4333  #42-4383 
PERRI0 021734 42-4340  #42-4343 
PERRI11 021744 42-4338 — #42-4345 
PERRI 021762 42-4346  #42-4349 
PERRI 022000 42-4350 #42-4353 
PERRI4 022016 42-4354  #42-4357 
PERRId 022034 42-4358 #42-4361 
PERR16 922044 42-4362  #42-4364 
PERRI? 022052 42-4344 42-4348 42-4352 42-4356 42-4360 #42-4366 
PERR 022162 42-4335  #42-4390 
PERR20 022100 42-4363 442-4373 
PERR 022110 42-4326  #42-4376 
PERR22 022116 42-4375 #42-4377 
PFECAD 04206 66-6427 #66- 
PFECDH 042456 66-6427  #66-6429 
PFECEM 042422 66-6427  #66-6428 
PFECFT 042516 66-6427  #66-6432 
PFECWS _ O4e412 466-6427 
PIRQ = 177772 #19-1783 
PIRQVE = 000240 #19-1783 
042672 65-6291 71-6496 
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VAL 
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43-4443 
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443-4472 
443-4525 


443-4479 


#43-4532 


«24-1811 


42-4376 
43-4472 


43-4537 


43-4454 


43-4513 


43-4486 
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#65-6291 
42-4384 


443-4547 
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43-4523 


43-4490 
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*65-6291 
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#43-4498 
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#434552 
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963-4537 
fle 


35-3466 


43-4449 


443-4467 
43-4437 


43-4447 


9 
35-3486 


PAGE 34 
QUENCE 221 
_ CREF vO01 
43-4461 43-4475 
43-4508 43-4521 
24-1811 *24-1811 
27-217 28-2265 
36-3711 37-3808 
46-506 47-5161 
53-6194 #64-6288 
*24-1811 24-1811 
* 35-3547 35-3554 
26-1946 27-1991 
35-3463 36-3621 
44-4570 45-4782 
53-6120 54-6204 
35-3512 35-3515 
35-3569 35-3575 
#71-6524 
#71~6523 
#71-6525 
#71-6526 
35-3499 35-3516 


—e es ee 


43-4479 


43-4526 


35-3560 
28-2195 


9 
#35-3608 


35-3576 


#35-3605 


43-4483 


30-2697 
68-6460 
#35-3601 
29-2275 


38-3817 
47-5074 


35-3588 


43-4487 


31-2876 


69-6469 


30-2333 
39-3917 
48-5170 


35-3599 


43-4492 


32-3044 
41-4293 
51-5834 


31-2705 
40-4020 
49-5250 


#35-3613 


eee ee ee er eee a 


43-4511 


51-5839 


32-2884 
41-4160 
50-5426 
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SEQUENCE af 





SYMBOL CROSS REFERENCE v01 
SYMBOL VALUE REFERENCES 
91 #35~- 
0166 #35~3605 
AT1 016672 #35- 

STACK = 001100 #19-178 24-1811 70-6491 

START 003616 19-1794 24-1811 65-6291 

STFS1 04 y #71~6519 

STKLMT = 177774 #19-1783 

STST1 03708 #71-6528 

$T1 04 #71-6520 

ST2 043660 #71-6521 

SWR 001140 #20-1795 43-181) *24-1811 24-1811 24-1811 *24-1811 4~-1812 5-1887 
53-3264 3-3266 55-6269 56-6271 56-6271 56-6271 6-6271 6-6271 
57-6273 57-6273 57-6273 57-6273 63-6285 63-6285 65-6291 65-6291 

SWREG 000176 #19-1794 24-1811 24-1812 63-6285 63-6285 

SwO = 000001 #19-1783 

SwO0 = 000001 #19-1783 19-1783 

Sw01 = 000002 #19-1783 19-1783 

sun = 000004 #19-178 19-1783 

SWO = 000010 #19-178 19-1783 

SW04 = 000020 #19-178 19-1783 

SwO5 = 000040 #19-1783 19-1783 

SWO06 = 000100 #19-1783 19-1783 

SWO7 = 000200 #19-1783 19-1783 

Sw08 = 000400 #19-1783 19-1783 

SwO9 = 001000 #19-1783 19-1783 

Sw = 000002 #19-1783 

Sw10 = 002000 #19-1783 

Sw11 = 004000 #191783 

Sw = 010000 #19-1783 

Sw = 020000 #19-1783 25-1887 33-3264 

SwW14 = 040000 #19-1783 

SW15 = 100000 #19-1783 

sue = 000004 #19-1783 

SW = 000010 #19-1783 

SW4 = 000020 #19-1783 

SwW5 = 000040 #19-1783 

SW6 = 000100 #19-1783 

SwW7 = 000200 #19-1783 25-1889 33-3266 

SW8 = 900400 #19-1783 

Sw9 = 001000 #19-1785 

$1 016144 5-3464 

$10 016322 #35-3510 

$11 016346 #35~-3518 35-3521 

$12 016356 35-3519  #35-3521 

S 076204 435-3477 35-3564 35-3571 

S aeSes #35-3478 32-4267 35-3579 

S4 01621 #35-348 35-3581 

$5 016236 #35-3488 35-3491 

$6 016246 35-3489 #35-3491 

$7 016254 #35-3496 35-3529 

$8 016314 #35-3507 35-3567 35-3574 35-3590 

$9 016316 #35-3508 35-3544 35-3592 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 3 
SEQUENCE 22 
oe ay: REFERENCE REFERENCES CREF v01 
a "000011 419-1781 71-6498 71-6500 «71-6501 «71-6505 = 71-6511 71-6512 71-6513 

71-6513 71-6516 “65:6 71-6517 71-6517 71-6517 71-6518 71-6318 
71-6519 71-6520 71-6520 71-6921 71-6921 71-6348 71-6543 71-6524 
71-6526 71-6527 «71-6528 += 71-6528 += 71-6529 71-65 71-6530 71-65 
71-6562 71-6542 71-6543 «71-6553. 71-6553 «71-6557 = 71-6557 71-6557 
73-6855 73-6856 73-6856 73-6856 © 73-6857 «= 73-6857 «= 73-6858 = 73-4557 
3-6860 73-6860 73-6861 73-6861 73-6862 73-6860 -6863 77-6863 
73-6872 73-6873 73-6874 73-6874 73-6875 73-6875 73-6876 73-6876 
73-6877 73-6881 73-6881 73-6882 73-6882 73-6885 73-6885 73-6885 
73-6886 73-6887 73-6887 73-6892 73-6892 © 73-6893 73-6900 73-6900 
73-6905 ~6907 ~6907 73-6908 73-6912 73-6912 73-6922 73-692 
73-6923 73-6947 «73-6947. 73-6953 73-6953 73-6956 = 73-6956 = 73-695 
73-6969 ~6969 73-6974 73-6974 73-6975 73-6975 = 73-6985 73-6985 
73-6989 73-7018 73-7018 73-7018 

TBITVE = 000014 #19-1783 *24-1811 *24-1811 

TDATIO 012116 32-28 $2-2893 32-2911 32-2931 32-2936 ©=— 32-2965 = 32-3001 += #32-3039 

TDATI? 012120 #32-3040 

TDATI2 012122 32-2962 #323041 

TDATI3. 012124 #32-2963  #32-3042 

TDAT 012106 35-9907 32-2910 «32-2959 «32-2964 «32-3002 «= #32-3034 

TDATO! «012710 #32-3035 

TDAT 012112 32-2916 32-2970 #32-3036 

TDATOS © 012114 32-2973  #32-3037 

012126 35-9978 32-2997 32-3004 «= 32-3011 «= 32-3022» #32=3044 

TERRO «011674 32-2900 #322982 

TERRI  —- 011756 32-2920 32-2972 #32-3000 

TERR2 «011776 32-2922  #32-3007 

TERR25 012012 32-300 -301 

TERR3 «012042 32-2954  #32-3017 

TERRG «012024 32-2975 #323012 

TKVEC = 0 #19~1783 

OCTNM 042522 6360 66-6361 66-6369 66-6402 —#66~6434 

TPATIO 012066 -2887 32-2930 #323024 

TPAT11 012070 #32-3025 

TPATI2 012072 32-2970 #323026 

TPATI3 012074 32-2973  #32-3027 

TPATZO 012076 -28 32-2939  #32-3029 

TPAT21 012100 #32-3030 

TPAT22 912102 #32-3031 

TPAT23 012104 #32-3032 

TPVEC. = 000064 #19-1783 

TRAPVE = 000034 #19-1783 *24-1811  *24-1811 

TRTVEC = 000014 #19-1782 

ST 004456 #25-1835 

TST10 ~—s- 0113112 32-2884 

TST11 = 012130 #33-3180 

TST12 ~—s- 015212 #34-3358 

TST13. (016142 #35-3463 

TST14 016706 #36-3621 

S115 917206 #37-3720 

TST16 «= 017504 #38-3817 

TST17, 020032 #39-3917 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT oo: PAGE 37 
V 


QUENCE 224 
A og — REFERENCE CREF 01 


tt acres NCES 
TST 00505 6-1 
TST20 02036 #40-4020 
TST21 02107 #41-4160 
TST ¢ 021574 #42~-4301 
TST 0 $$20 443-4422 
TST24 022750 #44-4570 
TST25 oer be #645-4782 
TST26 0 $798 #46~4924 
TST27 06238 #47-5074 
TST 5156 #27-1991 
TST 026132 #48-5170 
TST31 026440 #49~-5250 
TST 027506 #50-5426 
TST 031324 #51-5684 
TST 32660 #52-5896 
TST35 034710 #53-6120 
035474 #54-6204 
TST37 #54-6267 
TST4 006122 #28-2195 
TST5 006370 #29~2275 
TST6 006534 #30-2333 
TST? 010440 #31-2705 
TYPDS = 104405 #64~-6287 
TYPE = 104401 24-1812 24-1813 24-1814 33-3284 33-3291 33-3307 33~3317 33-3318 55-6269 
55-6269 55-6269 55-6269 55-6269 56-6271 56-6271 57-6273 57-6273 59-6277 
60-6279 61-6281 63-6285 63-6285 63-6285 63-6285 63-6285 63-6285  #64-6287 
rr mre 66-6529 66-6531 66-6556 66-6358 66-6386 66-6393 66-6408 
TYPOC = 104402 63-6285  #64-6287 66-6312 66-6353 66-6435 
TYPON = 104404 #64-6287 
TYPOS = 104403 55-6269 55-6269 55-6269  #64-6287 66-6377 
T1 011314 #32-2885 
T10 011462 32-2919 #32-2921 
T105 011470 32-2914 #32-2924 
111 011472 #32-2928 
T12 011500 32-2928 #32-2930 
T13 011514 #32-2933 32-2954 
714 011556 32-2943 #32-2946 
T15 911560 #32-2947 32-2986 32-3018 
116 011562 #32-2948 32-2988 
T17 011600 32-2953 #32-2956 
Te 011340 #32-2890 ~2891 
011640 “$395 2-2977 
011654 #32-2972 32-297 
011656 32-2971 #32-2973 
011670 -29638 #32-2977 
011406 32-2901 32-290 
011410 #32-2904 32-2982 
011412 #32-2905 2-2984 
011436 #32-2913 2-2924 
011452 #32-2918 32-2921 
024110 44-4682 44-4691 44-4709 44~4724 44-4735 44-4740 #44-4772 
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SYMBOL- CROSS REFERENCE 
SYMBOL "6 sie 





CREATED BY MACRO ON 20-OCT-81 AT 09:38 


0 
024676 


#45-4911 


44-4711 


44-4638 
#44-4712 


#44-4727 


44-4583 
444-4746 
444-4751 
#44-4756 

44-4675 


*44-4607 


44- 
#44-4639 


#44~-4695 


#44-4710 


*44-4664 
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#44-4626 
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PAGE 38 
SEQUENCE 22 
CREF V 


01 


444-4766 
44-4624 


44-4644 
444-4645 


44-4642 


44-47) 


#44-4768 


44-4660 


444-4769 
#44-4770 
#44-4771 


44-4673 


444-474) 
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am CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 39 
SEQUENCE .§*° . 


SYMBOL CROSS REFERENCE 01 
SYMBOL VALUE accents 
WOATO° tgs #45-491 
WDATC 5944's #45-491 
024704 gitaene 45-4810 45-4830 45-4838 45-4858 45-4866 45-4888 45-4891 45-4896 
WPATOO 024664 45-4786 45-4789 45-4793 45-4795 45-4814 45-4819 45-4823 45-4825 45-4842 
45-4845 45-4849 45-4851 45-4870 45-4875 45-4879 45-4881 45-4900 45-4901 
45-4902 45-4903 #45-4905 
WPATO1 4666 45-4 
WPATO2 024670 #45-4907 
WPATO3 024672 #45-4908 
WSETUP 024632 45-4800 45-4856 45-4886 #45-4900 
Wi 024112 #45~-4783 
w10 024334 45-482 445-4831 
Wii 024362 45-485 #45-4839 
Wie 024416 45-4844 #45-4846 
W135 024442 445-4853 5-4859 
ais 024456 45-4854  #45-4859 
W15 04 45-4861  #45-4867 
W16 024544 45-4872 #45-4876 
W17 024570 #45-4883 45-488 
We 024146 45-4788  #45-4790 
w20 04 45-4884  #45-4889 
024172 445-4797 45-480 
024210 45-4798  #45-4803 
w5 024240 45-4805 445-4811 
024300 45-4816 #45-4820 
024324 #45-4827 45-4831 
XAPT11 025502 #46-5057 
025460 46-4936 46-4959 46-4982 46-5005 46-5023 46-5028  #46-5046 
XDATO1 025462 #46-5047 
XDATO2 025464 #46-5048 
XDATOS 025466 #46-5049 
025520 46-5017 46-5025 46-5031 46-5039 46-5044  #46-5065 
XERR1 344 46-4942 46-4965 #46-5021 
XERR2 025426 46-4947 46-4970  #46-5035 
XERRS 025372 46-4988 46-5011 46-5026 
XERR4 025442 46-4993 46-5016 #46-5040 
XPATOO 025470 46-4928 46-4938 46-4974 46-4984 #46-5051 
XPATO1 925472 #46-5052 
XPATO2 025474 #46-5055 
XPATO3 025476 #46-5054 
XPAT10 025500 46-4932 46-4955 46-4978 46-5001 46-5021 46-5026  #46-5056 
XPAT1 025504 #46-5058 
XPAT1 025506 #46-5059 
XPAT20 025510 46-4951 46-4961 46-4997 46-5007 #46-5060 
XPAT21 025512 #46-506 
XPAT22 025514 #46-5062 
XPAT23 025516 #46-5063 
XTMP 025456 #46-4929 46-4952 +%46-4975 +*46-4998 46-5022 46-5027 46-5029 #46-5045 
x1 024710 #46-4925 
x10 025112 46-4964  #46-4966 
x11 025126 46-4969 #46-4971 
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CKFPAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 46 
SEQUENCE 227 
SYMBOL CROSS REFERENCE CREF v01 
SYMBOL VAL REFERENCES 
X12 025166 46-4977  #46-4979 
x13 025212 #46-49 46-498 
x14 025220 46-4987  #46-4989 
X15 025 46-4992  #46-499 
X16 025074 46-5000  #46-5002 
x17 025320 #46-5 46-503 
x2 024750 46-4931 #46-493 
x20 025326 46-5010 #46-5012 
x21 025342 46-5015  #46-5017 
x 024774 46-4940 46-494 
xd 025002 46-4941 46-4943 
x5 025020 46-4946 46-4948 
3 025060 46-4954  #46-4956 
x7 025104 946-4963 -49 
YDATOO 026070 47-5088 47-5108 47-5117 47-5125 #47-5141 
YDATO1 026072 #47-5142 
YDATO2 026074 #47-5143 
YDATOS 026076 #47-514% 
DONE 026130 47-5105 47-5120 47-5128 47-5134 #47-5161 
YERR1 025730 47-5110 #47-5113 
YERR2 025772 47-5112  #47-5121 
YERR3 026034 47-5097  #47-5129 
YFLAG 026060 47-5075 47-5098 *47-5100 447-5136 
YPATOO 026100 47-5076 47-5102 #47-5146 
YPATO! 026102 #47-5147 
YPATO2 026104 #47-5148 
YPATOS 026106 #47-5145 
YPATIO 026110 47-5077 47-5101 -#47-5151 
YPATI1 026112 #47-5152 
YPATI2 026114 #47-5153 
YPATI3. 026116 #47-515% 
YPAT20 026120 47-5082 47-5116 47-5126 #47-5156 
YPAT21 026122 #47-5157 
YPAT22 026124 #47-5158 
YPAT23 026126 #47-5159 
YTMP! 026 47-5076 47-5084 47-5101 47-5107 9 47-5115 47-5123 #475137 
YTMP2 2 “47-5077 47-5091 47-5102 = 47-5118 47-5126 447-5138 
YTMP3 2 #47-5078 47-5095 47-5103 47-5132 #475139 
1 025552 #47-5079 47510 
Y2 25600 #47-5085 47-5114 47-5122 47-5130 
v3 025624 #47-5092 47-509 
v4 25642 47-5096  #47-5098 
5 025702 47-5099  #47-5105 
¥6 025704 47-5093  #47-5106 
v7 025720 #47-5109 = 47-511 
ZDAT 026376 48-5183 48-5205 #48-5220 
ZDATO1 026400 #48-5221 
2DATO2 026402 #48-5222 
ZDATO3 026404 #48-5203 
0264 36 8-5200 48-5208 48-5214  #48-5240 
ZERR1 026302 48-5189  #48-5201 
ZERR2 026344 48-5193  #48-5209 





mee me ee 


CKF PAD 


SCMTAG 
5CM1 


$CM2 
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#48- 


#20-1795 


48-5194 
#48-5225 
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*24-1812 


57-6273 


sem 144 


#48-5196 
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QUENCE 228 
CREF V 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 42 
SEQUENCE 229 
SYMBOL CROSS REFERENCE CREF v01 
SYMBOL VALUE REFERENCES 
SCM5 = a's oi #20-1795 0-1795 20-1795 
SCM4 = 000024 #20-1795 0-1795 20-1795 #20-1795 20-1795 30-1 O88 #20-1795 0-1795 0-1795 
#20-1795 0-1795 20-1795 #20-1795 20-1795 0-1795 #20-1795 0-1795 0-1795 
#20-1795 20-1795 20-1795 #20-1795 0-1795 20-1795 #20-1795 0-1795 0-1795 
#20-1795 0-1795 20-1795 #20-1795 0-1795 20-1795 #20-1795 0-1795 0-1795 
#20-1795 0-1795 20-1795 #20-1795 0-1795 20-1795 #20-1795 0-1795 0-1795 
#20-1795 0-1795 20-1795 #20-1795 fae 20-1795 #20-1795 0-1795 0-1795 
#20-1795 20-1795 20-1795 #20-1795 0-1795 20-1795 #20-1795 
SCNTLG 041511 63-6285 #63-6285 
SCNTLU 041504 63-6285  #635-6285 
$C 001344 #20-179 
SCRLF 001313 #20-1795 33-3318 55-626 57-6273 57-6273 57-6273 59-6277 59-6277 59-6277 
63-6285 66-6501 66-6332 66-6339 66-6419 75-7190 75-7198 75-7198 75-7199 
75-7199 75-7200 75-7201 75-7201 75-720 75-7204 75-7204 75-72 75-720 
75-7205 75-7211 75-7211 75-7211 75-721 75-7214 75-7214 75-7214 75-7215 
75-7220 75-7220 75-7224 75-7224 75-7225 75-7225 75-7227 75-7227 75-7228 
75-7228 75-7228 75-7228 75-7229 75-7229 75-7250 75-7230 75-72 75-7231 
75-72 ¢ 75-7233 75-7236 75-7237 75-7240 75-7240 75-7244 75-7244 75-7245 
75-724 75-7258 75-7258 75-7259 75-7259 75-7287 75-7288 75-7288 75-7289 
75-7289 75-7289 75-7294 75-7294 75-7295 75-7295 75-7295 75-7295 75-7297 
75-7297 75-7298 75-7298 75-7298 75-7298 -7299 75-7299 
$SDBLK 040614 61-6281 61-6281 461-6281 
$DDWO 001402 #20-1795 
$DDW1 001404 #20-1795 
$DDW10 001426 #20-1795 
$DDW11 001430 #20-1795 
SDDW12 001432 #20-1795 
$DDW15 001434 #20-1795 
$DDW14 001436 #20-1795 
15 001440 #20-1795 
$DDW2 001406 #20-1795 
$DDW3 001410 #20-1795 
$DDW4 001412 #20-1795 
$DDW5 001414 #20-1795 
$SDDW6 001416 #20-1795 
$DDW7 001420 #20-1795 
SDDWS 001422 #20-1795 
$DDW9 001424 #20-1795 
SDEVCT 001326 #20-1795 
SDE VM 001374 #20-179 
GN 036442 55-6269 55-6269 55-6269 #55-6269 
SDTBL 04 61-628 #61-628 
SENDAD 036432 22-18 24-1812 #55-6269 57-6275 
SENDCT 036124 24-1811 #55-6269 
SENULL 036506 #55-6269 
SENV 001336 #20-1795 24-1812 57-6273 59-6277 62-6283 62-6285 
SENVM 001337 #20-1795 24-1811 59-6277 59-6277 62-6285 
oP 0 #55-6269 -64 68-6461 69-6470 
SEOPCT 036112 #24-1811 #55-6269 rl . 
SERFLG 001103 weg 1032 26-6671 *56-6271 56-6271 56-6271 56-6271 56-6271 §6-6271 57-6273 
SERMAX 001115 #20-1795 24-1811 56-6271 +*56-6271 56~6271 56-6271 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 43 
SEQUENCE E°° . 


SYMBOL CROSS REFERENCE 01 
SYMBOL V 


—= ——EE——————— 


OE ET 
SS > — -~ 








ALUE REFERENCES 
SERROR 037146 64-1811 #57-6273 
SERRPC 00116 w20-1793 25-1895 33-3273 #57-6275 #57-6273 57-6273 $7-6273 *57=6273 57-6273 
57-6273 66-6304 66-6311 66-6431 
SERRTB 001442 #21-1795 66-6325 
SERTTL 001112 #20-1795 55-6269 © 55~6269  $5-6269 55-6269 *57-6273 57-6273 57-627 
sc 001304 #20-1795 *24-1811  *56-6271 «57-6273 «= 57-6273 «= 57-6273 «= 57-6273 
T 001336 #20-1795 
SETEND 001442 #20-1795 23-1808 
SFATAL 001320 #20-1795  *62-6283  *66-6320 
FFLG_ 041070 #626283  *62-6283 6283 62-6283 62-6283 
SFILLC 001156 #20-1795 59-6277 59~6277 =: 59-6277 
SFILLS 001155 420-1795 59-6277 59-6277 
SGDADR 001120 #20-1795 
SGDDAT 001124 #20-1795 
$GET42 036404 55-6269 55-6269 #55-6269 
$GTSWR 041142 463-6285 64-6287 64-6287 
$HD = 000003 “1777. 19-1777, 191777 
SHIBTS 003602 #23-1808 
SICNT 001104 #20-1795 56-6271 56-6271 *56-6271 += 56-6271 = 56-6271 
ILL 042002 65-6291 65-6291 #65-6291 
SINTAG 001135 #20-1795 63-6285 63-6 63-6285 
SITEMB 001114 #20-1795 *25-1896 *33-3274 *57-6273 «= 57-6273 «= 57-6273 «= 57-6273 = 57-6273 ©: 66-6307 
F 001314 #20-1795 57-6273 57-6273 59-6277 59-6277 
SLFLG 041067 62-6283  #62-6283 
OOP 036500 55-6269 #55-6269 
$LPADR 001106 420-1795 *24-1811  *56-6271 + *56-6271 «56-6271 «456-6271: 56-6271 
SLPERR 001110 420-1795 *24-1811 25-1837 26-1947 #27-1992 *27-2009 -—-*27-2022 «= *27-2037 +=: *27-2050 
#27=2 £37-2079 *27-2094 *28-2196 #292276 #30-2335 «30-2377 «= *31-2706 §=— * 31-2758 
*32-2885 32-2928  %33-3182 33-3183 #33-3184 #33-3185 #35-3186 © #33-3187 + 33-3188 
£3$-3189 *33-3190 #33-3191 833-3192 #33-3193 #34-3359 —-#35-3464 —#35-3496 © # 36-362 
37-3721 *3B-381B 44-4580 844-4601 44-4621 844-4639 9 844-4 #45-4783  *45-4811 
£45-4839 45-4867 46-4925 46-4948 846-4971 846-4 47-5079 848-5174 © 49-5251 
£49-5280  *49-5314 50-5428 50-5456 50-5484 50-5513 9 *50-5542 *50-5570 = *51-5 
*51-5710 *51-5738 *51-5761 #51-5790 #51-5811 52-5898 = *52-5927  #52-5949 — #52-5977 
#525 #52-6027 52-6056 *53-6122 53-6151 #54-6206 © *54-6228 +«=—- 56-6271 *56-6271 
56-6271 56-6271 57-6273 
1350 #20-1795 
001354 #20-1795 
001360 #20-1795 
001364 #20-1795 
001316 420-1795 23-1808 23-1808 += 24-1811 24-1812.» 56-6271 +=: 57-6273 =: 59-6277 
001346 #20-1795 
001352 #20-1795 
001356 #20-1795 
001362 #20-1795 
003604 423-1808 
041066 "62-6285 62-6283 *62-6283 #62-6283 
041527 63-6285  #63-6285 
001332 #20-1795 62-6283 62-6283 
001334 #20-1795 *62=6283 
001316 W20-1795 62-6285 *62-6283 62-6283 *62-6283 
041516 63-6285  #63-6285 


— -—- ——_ ee 
eae” oo — 
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CKFPAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 44 
SEQUENCE §°" . 


SYMBOL CROSS REFERENCE 01 
SYMBOL VALUE REFERENCES 
SMTYP1 00134 #20-1795 
SMT YP2 00135 #20~1795 
SMTYPS 00135 #20-1795 
SMT YPS 001363 #20-1795 
SMXCNT 037140 36-6671 56-6271 56-6271 #56-6271 
SNULL 001154 #20-1795 59-6277 59-6277 59-6277 
SNWTST = 000001 #24-1835 24-1835 #25-1835 5-1835 #25-1946 5-1946 #26-1946 6-194 #26-1991 
6-1991  #27-1991 27-1991 =#27-2195 7=2195 #282195 8-2195 28-227 o-357 2 
#29~=2275 $7 $60? #292333 29-2333 430-2333 00-2333 #30-2705 A 05 # 1-¢ 05 
11-2705 # $39 3) ~$8ee W3e- SRE $f 884 #32- Hb 36° 18 #33-31 53-3180 
#33-3358 32-3 58 34-3358 2. 358 #34-3463 4-34 #35-346 ~34 #35-3621 
35-362 #36-3621 6-3621 436-3720 ~3720 #37-3720 37-3720 37-3817 37-3817 
#38-3817 8-3817 #38-3917 38-391 #39-3917 39-3917 pi 440-4020 
40-40 #40-4160 -4160 #41-4160 41-4160 #41-4301 41-4301 #42-4301 42-4301 
#42-4422 22-4422 = #434422 43-4422 #43-4570 43-4570 44-4570 44-4570 44-4782 
44-478 #45-4782 45-478 445-4924 5-4924 #46-4924 46-4924 #46-5074 46-5074 
#47-5074 47-5074 #47-5170 47-5170 #48-5170 48-5170 48-5250 48-5250 #49-5250 
49-5250 #49-5426 49-5426 #50-5426 50-5426 50-5684 50-5684 #51-5684 - 
#51-5896 51-5896 #52-5896 52-5896 #52-6120 52-6120 #53-6120 53-6120  #53-6204 
53-6204 #54-6204 54-6204 
SOCNT 040374 *60-6279  %60-6279  #60-6279 
SOMODE 040376 #60-6279 +%60-6279 60-6279 60-6279 +%60-6279  #60-6279 
SOVER 037124 56-6271 56-6271 56-6271 56~6271 #56-6271 
SPASS 001324 #20-1795 *24-1811 *55-6269 *55-6269 55-6269 55-6269 55-6269 55-6269 55-6269 
55-6269 56-6271 56-6271 56-6271 
SPASS2 036514 *55-6269 55-6269 55-6269 #55-6269 
SPASTM 003610 #23~-1808 
SPWRAD 041764 #65-6291 
SPWRON 041624 24-1811 #65-6291 65-6291 
SPWRMG 041760 #65-6291 
041676 65-6291 #65-6291 
001312 #20-1795 57-6273 57-6273 59-6277 59-6277 63-6285 
DC 041354 #63-6285 64-6287 64-6287 
SRDDEC = *eeeee 64-6287 
SRDLIN = **ete* 64-628 
SRDOCT = *eeaee 64-6287 
$RDSZ = 000001 #63-6285 63-6285 
SREGAD 001160 #20-1795 
SREGO 901162 #20-1795 57-6273 = =*57-6273 57-6275 
1 16 #20-1795 
$REG10 001202 #20-1795 
SREG11 001204 #20-1795 
SREG1 001206 #20-1795 
SREG1 001210 #20-1795 
SREG14 001212 #20-1795 
G15 001214 #20-1795 
$REG16 001216 #20-1795 
$REG17 001220 #20-1795 
G2 001166 #20-1795 
$SREG20 001222 #20-1795 
SREG21 001224 #20-1795 
G22 001226 #20-1795 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 45 
SEQUENCE 232 
SYMBOL CROSS REFERENCE CREF v01 
SY VALUE REFERENCES 
SRE 001230 #20-1795 
SREG 001170 #20-1795 
SRE 001172 #20-1795 
SREGS 001174 #20-1795 
E 001176 #20-1795 
SREG?7 AE #20-1795 
SRESRE 037542 #58-6275 64-6287 
T 036502 #55-626 
SRTRN 036476 24-1811 *24-1811 *24-1811 55-6269 #£55-6269 
2A = teetee 64-628 
SSAVRE 037504 #58-6275 64-6287 64-6287 
SSAVR6 042006 *65-6291 65-6291 *65-6291 65-6291 #65-6291 
sc 036516 4-1811 #56-6271 
SSETUP = 000137 #19-1793 -1793 #19-1793 19-1793 #19-1793 19-1793 #19-1793 19-1793 #1¥-1793 
19-1793 #19-1793 19-1793 #19-1793 24-1811 24-1811 24-1811 24-1811 24-1811 
24-1811 24-1811 24-1811 24-1811 24-1811 24-1811 24-1811 24-1812 24-1812 
ee 18le 23-0589 55-6269 56-6271 57-6273 57-6273 57-6273 57-6273 63-6285 
SSTUP 177777 #19-1793 #19-1793 19-1793 #19-1793 #19-1793 19-1793 #191793 #19-1793 19-1793 
#19-1793 #19-1793 19-1793 #19-1793 #19-1793 19-1793 #19-1793 #19-1793 19-1793 
SSVLAD 037070 56-6271 #56-6271 
$SvPC = 003602 #22-1806 22-180 
SSWR = 177400 -1777 #19-177 #19-1779 20-1795 20-1795 20-1795 24-1811 24-1811 24-1811 
24-1811 24-1811 5-1835 6-1946 27-1991 28-2195 29-2275 30-2333 31-2705 
32-2884 33-3180 4-3358 5-3463 36-3621 37-3720 38-3817 39-3917 40-4020 
41-4160 42-4301 43-4422 44-4570 45-4782 46-4924 47-5074 48-5170 49-5250 
50-5426 1-5684 52-5896 53-6120 54-6204 55-6269 55-6269 55-6269 55-6269 
55-6269 56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 
56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 56-6271 
56-6271 56-6271 56-6271 §7-6275 57-6273 57-6273 57-6273 57-6273 57-6273 
57-627 57-6273 57-6273 57-6275 57-6273 65-6291 
SSWREG 001340 #20-1795 24-1811 
SSWRMK = 000000 5 ay 18. 56-6271 56-6271 56-6271 $6-6271 56-6271 56-6271 56-6271 56-6271 
SSWRMS = 000200 #19-1780 . 
$TAB 042740 -640 #71-6498 75-7165 75-7165 75-7167 75-7167 75-7167 75-7168 75-7168 
75-7169 75-7171 75-7173 75-7179 75-7180 75-7181 75-7182 75-7185 75-7185 
75-7187 75-7187 75-7188 75-7189 75-7191 75-7191 75-7192 75-7193 75-7193 
75-7194 75-7196 75-7196 75-7197 75-7198 75-72 75-72 75-7203 75-7205 
75-7206 -72 75-7210 75-7210 75-7213 75-7213 75-7221 75-7221 75-7222 
75-7223 75-722 75-7227 75-7229 75-7229 75-7236 75-7239 75-7239 75-7242 
75-7242 75-7244 75-7253 75-7253 75-7258 75-7261 75-7261 75-7276 75-7287 
75-7287 75-7294 75-7297 75-7303 75-7303 75-7316 75-7345 ~7345 75-7346 
STBIT 036504 *24-1811 55-6269 55-6269 55-6269 #55-6269 +%65-6291 
STERM = 000030 #64-6289 
STESTN 001322 #20-1795 *%56-6271 66-6431 
STHE 043134 #71-6504 75-7177 75-7181 , 
STIMES 001302 #20-1795 +*24-1811 *55-6269 *56-6271 56-6271 *56-6271 56-6271 56-6271 
$TKB 001146 ween eae 26-6c71 23-660 59-6277 59-6277 59-6277 63-6285 63-6285 63-6285 
$TKS 001144 #20-1795 56-6271 59-6277 59-6277 59-6277 59-6277 63-6285 63-6285 63-6285 
-6285 63-6285 63-6285 63-6285 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 46 


SEQUENCE 233 
SYMBOL CROSS REFERENCE CREF vO01 


SYMBOL VALUE nerenemes 
STMPO 001232 #20-1795 . * 302 66-6503 75-7165 75-7167 13-7168 75-7171 75-7173 75-7179 
-7181 75-7185 75-7187 75-7189 75-7191 75-719 tah 75-7198 75-7200 
75-7203 75-72 75-7210 75-7213 75-7221 75-7 $3 75-722 13-766? 75-7232 
75-7236 75-7239 75-7242 75-7244 75-7253 75-7258 75-7261 75-7276 75-7287 
75-7294 75-7297 75-7303 75-7316 75-7335 75-7345 75-7346 
STMP1 001234 #20-1795  +%66-6504 75-7165 75-7167 75-7168 75-7171 75-7173 75-7179 75-7181 
75-7185 75-7187 75-7189 75-7191 75-7193 75-7196 75-7198 13-7609 el 
75-7206 75-7210 75-7213 75-7221 75-7223 75-7227 75-7229 75-7232 75-72 
75-7239 75-724 75-7244 et 3 75-7258 ea hy} 75-7276 75-7287 75-7296 
| 75-7297 75-730 75-7516 75-7335 75-7345 75-7346 
STMP10 001252 #20-1795 27-1995 we Hm 2 3: #27-2052 27-2081 +*30-2596  *30-2628  +*30-2635 *30-S8¢% 
ee a 4 ae #44~-4652 44-4650 75-7177 75-7179 75-7181 75-7224 75-72 
STMP11 001254 #20-1795 = 27-2122 = *27-2128 = *27-2146 = #272152 75-7178 75-7255 75-7303 
STMP12 001256 #20-1795 75-7235 i 
STMP15 001260 #20-1795 75-7235 
STMP14 001262 #20-1795 
STMP15 001264 #20-1795 *30-2595 +*30-2626 *30-2632 *30-2662 75-7224 
STMP16 0012 #20-1795 
STMP17 001270 #20-1795 
STMP2 001236 #20-1795 25-1877 25-1893 *25-1903 *25-1916 *25-1929 25-1934  +%*26-1966 *27-1999 
#27-2013 27-2028 27-2060 27-2056 +*27-2069 27-2084 *27-2097 *28-2206 *28-2260 
#29=2281 29-2312 30-2536 30-2378 30-2597 %350-2635 *31-2724 31-2772 *31-2821 
#31-2849 %32-2901 *32-2943 *32-2992 32-5018 33-3182 *33-3183 *53-3184 *335-3185 
#33-3186 *33-3187 33-3188 «= * 335-3189 9 #35-3190 §=— #3353191 §=— *335-3192 §=— 3535-3193 34-3424 
#35=3531 35-3564 *35-3567 *35-3571 35-3574 *35-3585 *35-3596 +*36-5669 * 
*36- *37-3768 37-3773 +*37-3782 ~ #38-3871 *38- #39-3 # 39-3974 
#39-3979  *39-3991 240-4095 40-4100 *40-4110  *40-4122 *40-4127 %41-4235 *41-4251 
#41-4263  *41-4268 3 3=— #424368 = #424375 = #42-4376 3 #42-4391 %43-45 #43-4505 
#43-4508  %43-4521 63-4526 «= #444592 9844-4615 9 244-4633 44-4651 9 #44-4679 3=— # 44-4688 
#44-4736 45-4788 45-4816  *45-484 #454872 246-4931 %46-4954 46-4977  +*46-5000 
#47-5114 47-5122 247-5130 *48-520 #48-5210 49-5258 49-5285 49-5320 6 
#49-5359 49-536 #50-5431 50-545 #50-5485 *50-5514 50-5545 +*50-5573 *51-5690 
#51-5713 39 #51-5739 «= #51-5762 «= #51-5791 9 851-5812 «= 52-5901 §=— *52-5930 §=9— 52-5952 39 #525974 
#52-6002 52-6030 52-6059 53-6125 53-6154  *54-6209 *54-62351 +%67-6444 
9-64 75-7165 -7167 1 75-7171 75-717 75-7179 5~7182 75-7185 
75-7187 75-7189 75-7191 75-7193 75-7196 75-72 75-7205 75-7206 75-7210 
75-7215 75-7221 75-7223 75-7227 75-7229 75-7232 75-7236 75-7259 75-7242 
75-7244 75-7253 75-7258 75-7261 75-7276 75-7287 75-7294 75-7297 75-7303 
75-7316 75-7345 75-7546 
$TMP20 001272 #20-1795 75-7172 75-717 75-7205 75-7220 
STMP21 001274 #20-1795 75-7171 75-717 | 
STMP22 001276 #20-1795 
STMP25 001300 #20-1795 
STMPS 001240 #20-1795 25-1878 *25- 6-1 #26-1976 27-2158 *27-2165 *28-2213 *28-2236 


*26-1970 

#29=2315 = # 30-2446 39— # 330-2454 3=— # 50-2482 3= * 30-2490 39 * 350-2515 
574 tk 2- 9544 =39-2994 #30-2598 30-2634 *31-2725 
* 


#41-4261 = #41-4269 = 842-4378 = 842-4385 = 845-451 #43=4527 = #44-4706 39 #444721 = #44-4738 
#45-4808 45-4836 45-4864 %45-4894 45-4900 46-5021 *46-5026 *46-5056  *46-5041 


-—— 


eee 
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ee ee —— ee —_- —_ 


SEQUENCE 234 
ao 1 ricco REFERENCES CREF v01 
847-5115  #47=5123 «9 #47=5131 39 848-5203) 9848-5211 849-5371 849-5377 = #49"5585 = #4 9-559 
* 95 249-5401 +*50-5599 +*50-5603 50-5606 *50-5612 “20-2018 #297206) *50-5627 
*50-5633 50-5639  *50-5642 “29-2808 *50-5651 50-5654 50-565 #51-5832 9 *51-5837 
#51-584 51-5852 *51-5858 51-5867 +*52-6086 *52-6089 ae 52 * 
#52-6093 52-6094 +*52-6095 * ¢-098 52-6097 52-6098  *52-6 *52-6100 *53-6181 
« 1 #53-6185 55-6186 *5 “Sis #54-6250 %54-6255 %54-6257 *$ -6447 75-7165 
75-7167 75-7168 75-7172 75-7180 75-7182 75-7185 75-7187 5-7191 75-7193 
75-7196 75-7198 75-7200 75-7203 75-7206 75-7210 75-7213 75-7221 75-7223 
75-7228 75-7230 75-7232 75-7236 Tol eze 75-7242 75-7244 75-7245 75-7253 
75-7261 75-7287 75-7294 75-7297 75-7345 
STMP4 001242 #20-1795 *62-sae) “90-3263 #26-1977 *27-2159 §=*27-2166 §=— * 28-2237 3=— 28-2251 “$3. 297 
#29=2303 #30-2447 30-2453 +*350-2478 *35- $050 "30-2514 * 76 83 *30-2591 8 *31-2823 
*31-2830 31-2851 +*32-2995 *32-3001 *32- 060 #33-3256 *35-3271 39 #35-3551 939 #3535557 
«36-366 &36-3677 %36-3686 *37-3767 39 *37"3775) = 837-3784 «= * 38-3866 «= * 38-3875) =— * 358 - 3885 
£39=3964 %39-3969 39-3981 39-3599 #40-4121 = #404129 = 841-4249 = #4 1-4262 = *4 11-4270 


7 75-7199 5-72 
75-7211 r2-76ie 75-7212 75-7222 75-7228 75-7231 75-7235 75-7237 75-7240 
STMP5 001244 #20-1795 25-1880 27-1993 28-2205 30-2448 *30-235 #30-2491 30-2515 30-2529 


#47=5125 %48-5205 %49-5372 49-5378 49-5386 49-5392 49-5397 *49-5405 * 
*50-5615 50-5624 50-5630 50-5636 *50-5644 51-5844 *51-5853 *51-5859  +*51~-5868 
#52-6089 52-6090 52-6091 52-6092 52-6093 52-6094 52-6095 * 
#52-6098 52-6099 +*52-6100 53-6184 53-6185 53-6186 53-6187 54-6255 *54-6257 
*55-6269 55-6269 *55-6269 "38-SSay *55-6269 *56-6271 ~7166 75-7177 75-7178 
75-7185 75-7199 75-71 75-7201 ~7202 75-7204 75-7211 75-7212 75-7214 
75-7215 75-7224 75-7225 75-7227 75-7229 75-7233 75-7240 75-7258 75-7259 
75-7288 75-7289 75-7295 75-7298 
STMPE 001246 #20-1795 #272123) = 27-2129 = #27=2147 = 27-2153 = *30-2449 = * 30-2460 §=— * 30-2465 §=—_ * 50-2496 
*30-2501 30-2516 30-2550 +*30-2545 * 0-530) *30-2576 +*30-2585  *30-2 *30-2619 
#30-2627 +*30-2646 30-2656 +*30-2663 31-2837 31-2843 32-3007 9 *32-5012 «© * 3535-3269 
#40=4104 40-4107 #40-4113 9 #40-4115 9840-4117 = #414244 prt rs #41-4254 41-4256 
*41-425 #42-4343 = 42-4347 = 842-4351 #42-4555 = 842-4559 = #424 #42-4394 2435-44677 
£43=4481 #434485 = #43-4489 = #434496 «9 #4324515 845-4517 = 844-4705 = #444720 §=— #454902 
#46-5029 #6725118 47-5126 «#485206 §=— #49-5369 «= #49"5375 = *49-5381 9 849-5383 = #49-5589 
#49=5398  %49-5404 50-5607 50-5613 *50-5619 *50-5622 *50-5628 50-5634  *50-5640 
#50-5643 *50-5649 50-5652 50-5655 50-5658 *51-5842 9 *51-58438 = *51-5851) #51 -5857 
*51-5863 51-5866 = *51-5872 «= 51-5875 §=— 52-6089 = 52-6090 §=— *52-6091 §=— *5 26092 o2e-ciae 
*52-6094 52-6095 52-6096 52-6097 * ¢- 098 +*52-6099 52-6100 +*53-6184  *55-6185 
#53-6186 *53-6187 54-6255 54-6257 75-7178 75-7199 75-7201 75-7211 75-7214 
75-7224 75-7230 75-7233 75-7259 75-7288 75-7299 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT ae uence 235" 
ee any . °  aleteacaaa . FERE cE v01 
STMP7 001250 #20") 3 #27-1994 27-2023 +*27-2051 *27-20 *30-2456  *30-249 * 531 *30-254 
*#30-255 $0-0877 30-25 +50-9637 t 1-388 34 -5ba6 3 - 35-4013 #40-410 
440-4109 #6126243 %41-4250 42-4567 “36-3 9 #43-4499 245-45 444-4699 44-4716 
75-7178 75-7202 75-7204 75-7215 7 ~ie¢2 Le or 7 mo 75-7289 
STN = 000037 19-1777 #19-1777 24-1835 25-1835 #25-1835 5-1 38 -1 g #26-1 -“~ 
27-1991 #27-1991 27-2195 8=2195  #28-2195 8-227 1 ¥ 46 
30-2333 #30-2333 30-6703 1=2705 #31-2705 1-2884 #32- , . 
33-3180 #33-3180 33-3358 4-3358  #34-5358 4-346 435-3463 1 
36-3621 #36365 36-3720 37-3720 #37-3720 7-381 & 17 7 
39-3917 #39-3917 39-4020 40-4020 #40-4020 40~4160 441-41 461-4 > 
42-4301 #42-4301 42-4422 43-4422 O72 68e 43-4570 44-4570 #44-4570 44-4 
45-4782 #45-4782 45-4924 46-4924  #46-4926 46-5074 47-507 #47-5074 47-5). 
48-5170 #48-5170 48-5250 49-5250 #49-5250 49-5426 50-5426 #5 2386 50- 
51-5684 #51-5684 51-5896 §2-5896 #52-5896 52-6120 53-6120 #53-6120 53-6204 
54-6204 #54-6204 54-6267 
STPB 001152 #20-1795 59-6277 59-6277 59-6277 
STPFLG 001157 #20-1795 59-6277 59-6277 59-6277 
STPS 001150 #20-179 pam 4 59-6277 59-6277 
STRAP 041540 24-1811 64-6287 
$STRAP2 041562 #64-6287 ~62 &. 
STRP = 000014 #64-6287 64-62 64-6287 64-6287 64-6287  #64-6287 64-6287 64-6287 64-6287 
64-6287 #64-628 ~6287 64-6287 64-6287 64-6287 #64-6287 64-6287 64-6287 
64-628 64-6287  #64-6287 64-6287 64-6287 5 64-6287  #64-6287 64-6287 
64-6287 64-628 -6287  #64-6287 64-6287 64-6287 64-6287 64-62 -6287 
64-62 64-6287 64-6287 64-6287  #64-6287 64-6287 64-6287 64-6287 64-6287 
464-6287 64-6287 64-6287 64-6287 64-6287 64-6287 64-6288 -62 -62 
64-62 464-6288 
STRPAD 041574 64-628 #64-6287 64-6289 
STSTM 036 #23-1808 
STSTNM 001102 #20-1795  %55-6269 56-6271 56-6271 *56-6271 56-6271 56-6271 56-6271 56-6271 
57-6273 57-6273 57-6273 66-6302 
STYPBN = *eeee% -62 
STYPDS 0400 #61-6281 64-6287 64-6287 
YPE 037600 #59-6277 62-6283 64-6287 64-6287 
STYPEC 0012 59-6277 59-6277 59-6277 #59~6277 63-6285 
STYPEX 040142 59-6277 59-6277 59-6277 #59-6277 
STYPOC 040170 #60-6279 64-628 64-6287 
STYPON 0204 60-6279 #60-6279 ~6287 
STYPOS 040144 60-6279 -62 
SUNIT 001330 #20-1795 
SUNITM 003612 #23-1808 
$U 001342 #20-1795 
SVECTI 001366 #20-1795 
SVECT2 001370 #20-1795 
SXOFF = 000023 -627 59-6277 
$SXON = 000021 59-627 59-6277 59-6277 63-6285 
SXTSTR 036642 #56-6271 
$$GE = 000001 #55-6269 #55-6269 55-6269 
SOF ILL 040375 *60-6279  +%60-6279 60-6279 #60-6279 
$40CAT = texans 56-6271 57-627 
RSE 042622 64-6288 #70-6480 
.$AS = tketee 62-6283 62-6283 
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CKF PAD CREATED BY MACRO ON 20-OCT-81 AT 09:9 eure ash” 
SYMBOL CROSS REFERENCE CREF 01 
SYMBOL VAL REFERENCES 

SX = 003602 #23-180 235-1808 
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CKFPAD CREATED BY MACRO ON 20-OCT-81 AT 09: Fe PAGE 30 
EQUENCE f 

RACRO NAME. REFERENCES ne 

ACCMAC rig-1353 33-3199 33-3193 33-3184 33-3185 33-3186 33-3187 33-3188 33-3189 33-3190 
#72-6633 #72-6637 #72-6638 

ASMAC1 #19-1210 #52-6089  #52-6090 52-6091 #52-6092 #52-6093 #52-6094 #526095 026-0076 #52-6097 

oatiees s34-003 #52~6099 #52-6100 #53-6184 #53-6185 #53-6186 #53-6187 854-6255 #54625 

AS1 472-6763 72-6803 #72-6804 #72-6805 are -OaNe #72-6811 #72-681 #72-6815  #72-6818 

AS10 #72-6793 #72-6831 #72-68353 472-6834 #72-685 #72-6836 #72-683 

AS11 #72-6799 72-6838 72-6840 72-6841 72-6842 72-6843 72-6844 72-6853 

AS 2-6766 #72-6820 #72-682 

AS #72-6772 72-6822 72-482 

AS4 #72-6778 #72-6824 #72-6825 

ASS #72~-6783 72-6826 72-6827 72-6846 

AS6 #72-6786 72-6828 72-6829 72-6845 

AS7 #72-6789 72-6830 72-6832 

COMMEN #19-1783 

ENDCOM #19~1783 

ENDPAS #19-1137 #55-6269 

ERMAC #19-1192 57-6273 

ESCAPE #19-1783 

GETPRI #19-1783 #556269 

GE TSWR #19-1785 24-1812 #24-1812 

HMAC1 #19-1223 34-3371 34-3372 34-3373 34-3374 34-3375 

HMAC2 #19-1233 834-3396 434-3397 434-3398 434-3399  #34-3400 

#19-1239 34-3381 434-3382 #34-3383 #34-3384 434-3385 

ITEMAC #19-1205 21-1802 -1802 21-180 21-180 21-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1862 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 1-1802 21-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 1-1802 21-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-180 1-180 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-180 1-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-180 1-1802 21-1802 21-1802 21-1802 21-180? 
21-1802 21-1802 21-1802 21-1802 21-1 1-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-1802 Aas + 4 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 21-1802 21-180 1-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 1-1802 21-180 21-1802 21-1802 21-1802 21-1802 21-1802 
21-1802 21-1802 21-1802 1-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 
61-1805 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 21-1802 


fm thy, 


72-6713 
#72-6717 


#72-6642 #72-6646 #72-6659 #72-6662 
#72-6650 72-6660 72-6663 72-6665 
#72-6656 #72-6661 #72-6664 #72-6666 #72-6678 
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CKFPAD CREATED BY MACRO ON 20-OCT-81 AT i nce 238 
MACRO CROSS REFERENCE 
MACRO NAME 


REFERENCES 
LOADTP #19-11 
LPERR #19-13 5-1837 26-1947 7-199 ¢/-3009 7- e 2 7-2037 7-2050 7- 7-2079 
“§ ~gine 9978 33 Om aan! 1- 1-2758 -2885 ¢- 9 : 182 
3-318 53-3184 53-3185 33-3186 33-5187 3 1 53-3189 1 3191 -3192 
33-319 34-3359 35-3464 35-3496 70-7866 ~3721 8- ai8 17-2808 rae t 44-4621 
44-4639 44-4668 45-4783 45-4811 4 mS 45-4867 46-4 ¢ 36-325 4 1 46-4 
47-5079 48-5174 49-5251 49-5280 49-5314 50-5428 50-5456 50-54 50-551 50-5542 
50-5570 51-5686 51-5710 51-5738 51-5761 51-5790 31-25 52-5 52-592 $2-5949 
eeenen 93523359 52-5999 52-6027 52-6056 53-6122 53-6151 54-6206 54-622 
MSG #24-1817 #25-1 #25-1941 #26-1946 #26-1983 #27-1991 : 2-8 195 # 8 75 
#29~2321 430-2533 #30-2700 #31-2705 # pa 4 Ae-208e gc? £ +53- 199 ’ 3-459 150-3 58 
34-3456 435-3463 835-3615 436-3621 9 #36-571 437-3720 #38-381 #38-3909 #39-3917 
#39-4013 #40-4020 #40-4153 441-4160 #41-429 #42-4301 a eit 9643-46422 863-4554 #44-4570 
844-6775 «8465-4782 9 #45-4918 §=—- #464924 «= #46-5067 8=— #4750746 #438-5170 848-5243 #49-5250 
—_ peter H #50-5426 #50-5674 451-5684 451-5889  #52-5896 139-611 #53-6120 #535-6195  #54-6204 
NAMEP #19-1182 24-1812 
NEWTST 819-1783  #26-1835 25-1946 #26-1991 27-2195 #28-2275 #29-2333 #30-2705 #31-2 #32-3180 
#33-3358 #34-3463 435-3621 #36-3720 437-3817 438-3917 & on ee5e #40-4160 #41-43501 #42-4422 
aoe tone #44~-4782 #45-4924 #46-5074 847-5170 #48-5250 849-5426 850-5684 51-5896 #52-6120 
NTMPM #19-1178 
POP #19-1783 #58-6275 61-6281 #62-6283 462-6283 #65-6291 65-6291 
PUSH #19-1783 #58-6275 #61-6281 #62-6283 #62-6283 62-6283 65-6291 #65-6291 
REPORT #19~1783 
ROMAC #19~1283 
RSET #19-1185 #25-1938  #26-1981 #27-2173 #28-226 #29-2318  #30-2697 #31-2876 #32-3044 #33-33551 


2265 
34-3452 #35-3613 436-3711 437-3808  #38-3907 #39-4011 440-4151 841-4295 = #424415 = 43-4552 
5 #50-5672 #51-5834 #51-5839 #51-5888 #52-6112 
#53-6194 #67-6451 #68-6460 469-6469 


RTMPM #19-1173 

SETPRI #19-1783 

SETTRA #64~6287 464~6287 #64-6287 64-6287 464-6287  #64-6287 64-6287 #64-6287 #64-6287 #64-6287 

SETUP #19-1783 24-1811 

SKIP #19-1783 

SLASH #19-1783 

SPACE #19-1331 9 #19-1783 

SSKAD #19-1322 

STARS #19-1783 20-1795 20-1795 20-1795 22-1806 $3- 1808 23-1808 23-1808 25-1835 25-1855 
26-1946 26-1946 27-1991 27-1991 28-2195 8-2195 29-2275 29-2275 30-2333 30-2333 
31-2705 31-2705 32-2884 32-2884 23-2555 $3 -gun0 -3199 34-3358 34-3358 35-3465 
35-3463 36-362 -3621 37-3720 37-3720 8-3817 8-3817 39-3917 39-3917 40-4020 

0 41-4160 41-4160 42-4301 42-4301 43-4422 43-4422 44-4570 44-4570 45-4782 

45-4782 ~4924 46-4924 47-5074 47-5074 48-5170 8-5170 49-5250 49-5250 50-5426 
59-542 51-5684 51-5684 52-5896 2-5896 53-6120 53-6120 54-6204 54-62 55-6269 
56-6271 57-6273 58-6275 59-6277 60-6279 61-6281 62-6283 63-6285 63-6285 63-6285 
64-6287 65-6291 65-6291 66-6294 67-6439 68-6454 69-6463 70-6472 

SUMMAC #19-1310 #25-1835  #33-3180 

SwWRSU #19-1783 24-1811 #24-1811 

TMAC #19-1202 54-6267 
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CKFPAD CREATED BY MACRO ON 20-OCT-81 AT 09:38 PAGE 52 
SEQUENCE Af?” . 


MACRO CROSS REFERENCE 01 
MACRO NAME 


REFERENCES 
#64-6 fi 64-6289 
TYPBIN #19-1 
TYPDEC #19-17 
TY #19-178 24-1812 
TY #19-17 
TYPOCS #19-178 #55-6269 #55-6269 #55-6269 
TYPOCT #19-178 53-6285 
TYPTXT #19-178 26-1813 424-1814 #55-6269 #55-6269 455-6269 #55-6269 456-6271 #56~6271 
CMRE #19-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 
hs ep tae: #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 
SSCMTM #19-1795 #20-1795 #20-1795 #20-1795 20-1795 #20-1795 #20-1795 #20-1795 #20-1795  #20-1795 
As eb tae: #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 #20-1795 
SSESCA #19~1783 
SSNEWT #19-1783 4-1835 5-1946 26-1991 27-2195 28-2275 29-2333 30-2705 31-2884 32-3180 
33-3358 4-3463 5-3621 36-3720 37-3817 38-3917 39-4020 40-4160 41-4301 42-4422 
oe cant 44-4782 45-4924 46-5074 47-5170 48-5250 49-5426 50-5684 1-5896 52-6120 
SSSET wes ~0c87 roe 64-6287 64-6287 64-6287 64-6287 64-6287 64-6287 64-6287 64-6287 
SSSETM #24-1811 #24-1811 
SSSETU #24-1811 #24-1811 
SSSKIP #19-1783 
-EQUAT #19-1772 = #19-1783 
-EQUIV #19-1328 #19-1776 #19-1783 19-1783 19-1783 19-1783 419-1783 #19-1783 419-1783 #19-1783 
#19-1783 #19-1783 419-1783 #19-1783 419-1783 419-1783 #19-1783 419-1783 419-1783 =#19-1785 
#19-1783 9 #19-1783 —_- #19-1783 = #19-1783 = #19-1783 
- HEADE #19-1772 = #19~1777 
» SETUP #19-1772 = =#19-1795 
. SWRHI #19-1772 
- SACT1 #19-1772 22-18 
- SAPTB #19-1774 #20-1795 20-1795 
» SAPTH #19-1774 23-18 
- SAPTY #191775 62-628 
- SCATC #19-1772 = #19-1794 
~SCMTA #19-1772 = #191795 
. SEOP #19-952 #55~6269 
- SERRO #19-1596 #57-6273 
. #19-1774 #65-6291 
- SREAD #19-1775 63-6285 
- SSAVE #19-1773 =#58-6275 
. $SCOP #19-1335 #56-€271 
- STRAP #19-1774 #64-6287 
-STYPD #19-1774  #61-6281 
-STYPE #19-1775 59-6277 
- STYPO #19-819 60-6279 
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